我正在设置一个允许用户下载自定义数据集的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 ,即inputfilename
。 (如果我在该槽中给它简单的string,它也不起作用)。
但它提供给我DownloadData或任何名称给我的output
variables(比较截图)。
题:
这是一个操作系统问题,我怀疑,还是我做错了什么?
我该如何解决? 我可以得到这个在任何系统上工作吗?
谢谢!
我运行基本OS 0.4 Loki,build立在“Ubuntu 16.04.2 LTS”,GTK版本:3.18.9。 &RStudio 1.0.143
如果你正在使用Rstudio浏览器来测试你的应用程序,这可能是问题。 我在Windows上有同样的问题。
当我使用Rstudio浏览器的文件名是不正确交出,但如果我使用Firefox一切正常 。 您的代码在我的Firefox中也可以正常工作。