downloadButton / downloadHandler无法识别filename参数

Question

我在Shiny中遇到了downloadHandler()的问题：
如果我想通过此函数下载任何文件，下载窗口中的文件名与输出变量的名称相同（在示例中：“downloadData”），但不是因为它在“filename =”中声明downloadHandler（）（应该是“data-2017-02-13.csv”）。

请注意，以下示例来自downloadHandler（） - 帮助页面，因此我想R或RStudio存在一个普遍问题，我在其中编写R脚本。
此外，当我在网络浏览器中打开闪亮的应用程序时，问题就会消失 这部分地解决了它，但我仍然想知道为什么闪亮在RStudio和Web浏览器中表现不同。

## Only run examples in interactive R sessions
if (interactive()) {

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)
}

在这里我得到的下载窗口：

Answer 1

当我使用RStudio预览窗口并且能够通过始终使用命令打开浏览器来解决此问题时，我遇到了同样的问题

runApp(launch.browser = TRUE)