Rシャイニー：画像ファイルをアップロードしてサーバーに保存

Question

画像をアップロードし、Shinyを使用して画像をサーバーファイルシステムに保存しようとしています。私は画像の詳細とデータパスを含むdata.frameを作成

fileInput 

を見つけたアップロードするには

。これはどのようにしてリモートサーバーに保存できますか？

Answer 1

ここは基本的な例です。アップロードされたファイルはサーバー上の場所にのみコピーされます。これは同じコンピュータにありますが、どこにでもあります。 UI側で

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)