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

1 回答

• 2

  您可以使用 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)
  

  回复于 2024-05-03T22:02:10+08:00