如何在 R Shiny 应用程序中下载 PowerPoint 文件？

Question

我有一个闪亮的网络应用程序。我想创建一个 downloadButton，单击它会下载 PowerPoint 文件。我需要在 downloadHandler 函数中添加什么才能从某个文件路径读取 PowerPoint 文件，然后将该文件下载到按下按钮的用户？

Answer 1

您可以使用file.copy功能。以下是 c:/temp 中文件的基本示例。

library(shiny)

ui <- fluidPage( 
  downloadButton("downloadFile", "Download File")
)

server <- function(input, output) {

  fileName <- "test.pptx"
  filePath <- "c:/temp"

  output$downloadFile <- downloadHandler(
    filename = function() {
      fileName # default file name use by browser, it could be different
    },
    content = function(file) {
      file.copy(file.path(filePath, fileName), file)
    }
  )
}

shinyApp(ui = ui , server = server)

如何在 R Shiny 应用程序中下载 PowerPoint 文件？

How do I download a PowerPoint file in a R Shiny app?

r

shiny

shiny-server

shiny-reactivity