R闪亮-没有出现图像

Question

我正在尝试在闪亮的页面上插入徽标。

以下是可重现的示例：

app.R文件：

type tProps = { tagType: linkTagTypes, link: string } | { tagType: nonLinkTagTypes, link?: string }

我使用runApp按钮运行应用程序

ui.R文件：

setwd(".../shinyApp") source("ui.R") source("server.R") shinyApp(ui, server)

但是这不起作用...我有一个问号错误，而不是我的徽标，好像R找不到我的图像。不过，问号恰好位于我的sidebarPanel中（并且出现了文本“ Done by”）。

我将自己的图片放在www目录中，因为我在很多地方都读到它是一种解决方案（例如Image not showing in Shiny app R ）。

我闪亮的应用程序结构如下：

• 一个app.R文件：

• shinyApp目录，其中包含：我的ui.R，我的server.R和包含我的logo.png的www目录

我不知道我做错了什么...任何人都可以帮忙吗？非常感谢 ！

Answer 1

有两种方法来构建闪亮的应用程序。

1. 在单个文件中定义ui和服务器，并将其命名为app.R

   library(shiny)
   ui <- shinyUI(fluidPage(
     titlePanel("Blabla"),
     sidebarLayout(
       sidebarPanel(
         sliderInput(inputId="min",
                     label="Values",
                     min = 10, max = 100, value = 10,sep=" "),
         h6("Done by:"),
         img(src='logo.png',height=50,width=50)
       )
   
     )))
   
   server <- function(input, output, session) {
     } shinyApp(ui, server)
   

2. 将ui和服务器定义为单独的页面，并将它们另存为ui.R和server.R

示例ui.R页面

ui <- shinyUI(fluidPage(
  titlePanel("Blabla"),
  sidebarLayout(
    sidebarPanel(
      sliderInput(inputId="min",
                  label="Values",
                  min = 10, max = 100, value = 10,sep=" "),
      h6("Done by:"),
      img(src='logo.png',height=50,width=50)
    )

  )))

示例server.R页面

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

}

闪亮的输出