r - 下载由闪亮生成的文件

Question

我正在尝试下载一个 BSON 文件，我使用 mongolite 包从 MongoDB 导出到我的闪亮应用程序。这是我的下载按钮中的代码：

output$downloadTiming <- downloadHandler(
  filename = "/keyTiming.bson",
  content = function(fileToDownload){

    mongolite::mongo(
      collection = "keyTiming",
      url = "mongodb://<User>:<Pass>@<url>"
    )$export(fileToDownload, bson = TRUE)
  }
)

当我尝试下载它时，它显示“错误：继承（con，“连接”）不是 TRUE”。我花了很多时间研究并没有发现任何东西，希望这里有人可以使用。

Answer 1

我最终想通了。最终代码如下所示

   output$downloadTiming <- downloadHandler(
  filename <- function(){
    return("timingOut.bson")
  },
  content <- function(file){

    outFile = file("timingOut.bson")

    mongolite::mongo(
      collection = "timings",
      url = "mongodb://<user>:<pass>@<database>"
    )$export(outFile, bson = TRUE)

    file.copy("timingOut.bson", file, overwrite = TRUE)
  }
)