如何让R Shiny downloadHandler文件名起作用？

Question

我正在设置一个Shiny应用程序，允许用户下载自定义数据集。 在本教程之后 ，我按照文档中给出的示例设置了downloadHandler （在此处转载，因为如果我复制并粘贴它，会发生同样的事情）。

ui <- fluidPage(
  downloadLink("downloadData", "Download")
)

server <- function(input, output) {
  # Our dataset
  data <- mtcars

  output$downloadData <- downloadHandler(
    filename = function() {
      paste("data-", Sys.Date(), ".csv", sep="")
    },
    content = function(file) {
      write.csv(data, file)
    }
  )
}

shinyApp(ui, server)

问题：

这个问题只出现在我的Linux *系统上，似乎在Mac上运行得很好。 下载和一切工作正常，但“保存”GUI不提供正确的文件名。 没有错误消息或警告。 根据我的意见，

• 我希望它能给我data- TIME.csv ，即filename的输入。 （如果我在那个插槽中给它简单的字符串，它也不起作用）。

• 但它提供了DownloadData或我给output变量的任何名称（参见截图）。

题：

• 这是我怀疑的操作系统问题，还是我做错了什么？

• 我该如何解决？ 我可以在任何系统上使用它吗？

谢谢！

我正在运行基本的OS 0.4 Loki，基于“Ubuntu 16.04.2 LTS”，GTK版本：3.18.9。 ＆RStudio 1.0.143

Answer 1

如果您使用Rstudio浏览器测试应用程序这可能是问题所在。 我在Windows上遇到同样的问题。

当我使用Rstudio浏览器时，文件名没有正确移交，但如果我使用Firefox，一切正常 。 您的代码在我的Firefox中运行良好。