下载处理程序不保存文件shiny R

Question

library(shiny)
library(plyr)

shinyServer(function(input, output){

  myfile<-reactive({
#reading 3 csv files and merging them into a dataframe
  })

  output$downloadData<-downloadHandler(

    filename = function(){

      paste("mergedfile","csv",sep='.')
    },

    content= function(file){
      write.csv(myfile(),file,sep=",")
    }
  )

})

我正在阅读3-4个文件的反应，然后合并他们。之后，如果不显示它们，我需要下载合并后的文件。

我写了上面的代码，但打开了一个对话框，询问我要保存到哪里，但文件没有保存。我是不是对下载处理程序做错了什么。

ui.R

downloadButton('downloadData','Download')

这是我的主面板中ui.R文件中的内容

Answer 1

您可能正在使用Rstudio查看器来运行应用程序？在浏览器中打开应用程序，您的代码就会正常工作(单击在浏览器中打开或运行runApp('/path/to/myApp',launch.browser=T) )。

请参见this链接。

也不需要为write.csv设置sep=","，因为这是默认设置。