2

我将文件存储在我的 Dropbox 中，并通过 rdrop2 在 shinyapps.io 托管的闪亮应用程序上访问它们。以下代码在我的笔记本电脑上运行良好，但当我在 shinyapp.io 上部署我的应用程序并冻结不透明屏幕时中止。关于为什么以及如何进行故障排除的任何线索？非常感谢！- 斯蒂芬

这是我正在使用的代码（来自https://github.com/karthik/rdrop2）：

  token<-drop_auth()
  saveRDS(token, "droptoken.rds")
  token <- readRDS("droptoken.rds")
  ZIPFile<-drop_read_csv(as.character(ZIPCode),sep="",dtoken=token)

和ShinyApp 日志：

2015-10-16T17:55:46.965850+00:00 shinyapps[64206]：警告：观察者中未处理的错误：oauth_listener() 需要交互式环境。
2015-10-16T17:55:46.965853+00:00 shinyapps[64206]: 观察({
2015-10-16T17:55:46.965854+00:00 shinyapps[64206]: if (input$Recalc < 1)
2015-10 -16T17:55:46.965856+00:00 shinyapps[64206]: return()
2015-10-16T17:55:46.965857+00:00 shinyapps[64206]: ZIPCode <-isolate(input$NewZIP)
2015-10-16T17 :55:46.965858+00:00 shinyapps[64206]: token <- drop_auth()
2015-10-16T17:55:46.965859+00:00 shinyapps[64206]: saveRDS(token, "droptoken.rds")
2015-10 -16T17:55:46.965861+00:00 shinyapps[64206]: 令牌 <- readRDS("droptoken.rds")
2015-10-16T17:55:46.965862+00:00 shinyapps[64206]: ZIPFile <- drop_read_csv(as.character(ZIPCode), sep = "",
2015-10-16T17:55:46.965863+00:00 shinyapps[ 64206]：dtoken = 令牌）

4

1 回答 1

3

问题已解决：重新审视 rdrop2 提供的说明：

  1. 前两行代码仅在本地完成一次：

    token<-drop_auth() saveRDS(token, "droptoken.rds")

  2. 文件 droptoken.rds 将存储在与正在开发应用程序的文件夹结构相同的文件夹结构下。

  3. 最后两行代码将保留在应用程序中：

    token<-drop_auth() saveRDS(token, "droptoken.rds")

这样，当您在服务器上部署应用程序时，您也在部署令牌。提出了一些安全问题，但我需要等待一组好的 oauth 说明，在 r 下使用 Dropbox。

于 2015-10-17T02:21:58.233 回答