Question

我试图使用mongolite软件包下载从MongoDB导出到我的闪亮应用程序的BSON文件。这是我的下载按钮中的代码：

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

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

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

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)
  }
)

下载闪亮生成的文件

1 个答案: