Question

我有一系列＆＃34; .jpg＆＃34;我脚本的www文件夹中的文件。我想让renderImage使用名为＆＃34; dateplatform.jpg＆＃34;的文件名来渲染图像。基于我的UI的输入（日期，平台）。当我在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()

希望这有帮助。

Shiny SelectInput为renderImage生成文件路径

1 个答案: