图片无法显示RShiny

Question

我在使用Shiny应用程序显示图像时遇到问题。代码保存在Desktop中，我还有一个带有logo.png的www文件夹。我也将工作目录设置为桌面：

library(shiny)
library(png)

ui <- fluidPage(
  img(src="logo.png", height = 400, width = 400)
) #close fluidpage


server <- function(input, output, session){

} # closer server

shinyApp(ui=ui, server=server)

这里是输出的外观。

我更喜欢将server和ui放在同一个文件中以便于理解。也许这就是问题？

Answer 1

如果您只想显示图像。您可以在Rshiny上提供HTML。以下是修改后的代码，您可以尝试。希望它有效

library(shiny)
library(png)

ui <- fluidPage(
 headerPanel(
  list(tags$head(tags$style()), 
     HTML('<img src="logo.png", height="400px"    
          style="float:right"/>','<p style="color:black"></p>')
         )#headerPanel closes
        ) #close fluidpage


       server <- function(input, output, session){

       } # closer server

       shinyApp(ui=ui, server=server)

Answer 2

类似有光泽的img问题solved here。不是直接或在控制台中执行代码，而是创建格式正确的app.R并点击Run App似乎有效。