レンダリングイメージのファイルパスを生成するShiny SelectInput

Question

私のスクリプトのwwwフォルダ内に一連の ".jpg"ファイルがあります。私はrenderImageを使用して、自分のUIの入力（日付、プラットフォーム）に基づいて "dateplatform.jpg"という名前のファイル名で画像をレンダリングします。下のスクリプトをserver.rファイル内で試してみると、アプリは画像を表示していません。何かご意見は？

UI（部分）

 fluidRow(
       column(width=12, 
       imageOutput("platformimage") 
        ) 
       ) 

サーバー（部分）

filename <- reactive ({ 
    paste(input$date, input$platform, sep="") 
    }) 

    output$platformimage <- reactive({ 
    renderImage({ 
    list(src = filename(), 
     width = 600, 
     height = 600) 

      },deleteFile = FALSE) 
    }) 

Answer 1

filenameは、それに結合した少なくとも拡張子を持つ必要があり、それをnormalizePathするために、おそらくほうが安全です：

filename <- reactive({ 
    normalizePath(file.path(paste0(input$date, input$platform '.jpg'))) 
}) 

これが失敗した場合は、おそらくサーバーがファイル。 filename()によって作成されたパスを確認し、内部を修正してくださいfile.path()

希望します。