图像不显示 RShiny

Question

我在 Shiny 应用程序中显示图像时遇到问题。代码保存在桌面中，在那里我还有一个带有 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

类似的闪亮img问题在这里解决了。而不是直接或在控制台中执行代码，创建一个正确的格式app.R和点击Run App似乎工作。

Answer 2

如果您只想显示您的图像。您可以在 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)