如何让 R Shiny downloadHandler 文件名正常工作？

我正在设置一个 Shiny 应用程序，允许用户下载自定义数据集。继tutorial https://shiny.rstudio.com/articles/download.html，我设置了下载处理程序 https://shiny.rstudio.com/reference/shiny/latest/downloadHandler.html按照中给出的示例docs https://shiny.rstudio.com/reference/shiny/latest/downloadHandler.html（在此处复制，因为如果我复制并粘贴此内容，也会发生同样的事情）。

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)

Problem:

此问题仅出现在我的 Linux* 系统上，并且在 Mac 上似乎工作得很好。下载和一切工作正常，但“保存”GUI 没有为我提供正确的文件名。没有错误消息或警告。根据我的输入，

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

• 但它为我提供了下载资料或者我给它起的任何名字output变量（参见屏幕截图）。

问题：

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

• 我该如何解决？我可以让它在任何系统上运行吗？

Thanks!

我正在运行基本操作系统 0.4 Loki，基于“Ubuntu 16.04.2 LTS”构建，GTK 版本：3.18.9。 &RStudio 1.0.143

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

当我使用 Rstudio 浏览器时，文件名未正确移交，但是如果我使用 Firefox 一切正常。你的代码在我的 Firefox 中也运行得很好。