如何让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不提供正确的文件名.没有错误消息或警告.根据我的意见,

• 我希望它能给我数据TIME.csv,即输入到filename.(如果我在那个插槽中给它简单的字符串,它也不起作用).

• 但它提供了我下载数据或我给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中运行良好.