Question

我尝试上传图片，然后使用Shiny将其保存到服务器文件系统。

上传我找到了

fileInput

创建一个包含图像细节和数据路径的data.frame。那如何用它来保存到远程服务器呢？

Answer 1

这是基本的例子。它仅将上载的文件复制到服务器上的位置。这是在同一台计算机上，但它可能在任何地方。

library(shiny)

shinyApp(
  ui = shinyUI(  
    fluidRow( 
      fileInput("myFile", "Choose a file", accept = c('image/png', 'image/jpeg'))
    )
  ),
  server = shinyServer(function(input, output,session){
    observeEvent(input$myFile, {
      inFile <- input$myFile
      if (is.null(inFile))
        return()
      file.copy(inFile$datapath, file.path("c:/temp", inFile$name) )
    })
  })
)

shinyApp(ui, server)

R Shiny：上传图像文件并保存到服务器

1 个答案: