ShinyApp - 使用rdrop2进行Dropbox身份验证

Question

我将文件存储在我的Dropbox上，并且通过shinyapps.io上的shinyapp上的rdrop2访问他们。以下代码在我的笔记本电脑上效果很好，但是当我在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（）需要一个交互式环境。 （输入$ Recalc < 1 ）
2015-10-16T17：55：46.965856 + 00：00 shinyapps [64206]：返回（）
2015-10-16T17：55：46.965857 + 00：00 shinyapps [64206]：邮政编码< - 隔离（输入$ NewZIP）
2015-10-16T17：55：46.965858 + 00：00 shinyapps [64206]：令牌< - drop_auth（）
2015-10-16T17：55：46.965859 + 00：00 shinyapps [64206]：saveRDS （令牌，“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]：zip文件< - drop_read_csv（as.character（邮政编码），九月= “”，
2015 -10-16T17：55：46.965863 + 00：00 shinyapps [64206]：dtoken =令牌）

Answer 1

问题解决了：有一个重新审视由rdrop2提供的说明：

1. 两个第一行代码将在本地完成，一次完成：

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

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

3. 代码的最后两行应保存在应用程序：

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

当您部署在服务器上的应用程序通过这种方式，你还部署令牌它。带来一些安全问题，但我需要等待r下的Dropbox的一系列oauth指令。