如何将图像放在R Shiny标题中

Question

所以我使用的是R Shiny,我想在标题的文本右侧放置一个图像.我似乎可以将图像放在应用程序的任何位置,但标题旁边除外.你能不把图像放在titlePanel()功能中吗？这是我正在使用的代码片段:

library(shiny)

# Define UI for random distribution application 
shinyUI(fluidPage(#theme="bootstrap.css",

  # Application title
  titlePanel("My Title",img(src = "picture.jpg", height = 50, width = 100)),
  sidebarLayout(
    sidebarPanel(

因此,当我使用上面的代码时,我似乎无法在应用程序的任何位置看到我的图像....

Answer 1

一种方法是遵循这篇文章中的指示:如何在闪亮的navbarPage()上将图像插入导航栏(SO猎犬会将其作为重复攻击).

在您的工作目录中创建一个名为'www'的文件夹,并将'picture.jpg'放入其中:

| shinyApp/
    | ui.R
    | server.R
 | www/
    | picture.png

使用div在titlePanel中包含您的图片:

ui.r

library(shiny)

# Define UI for random distribution application 
shinyUI(fluidPage(#theme="bootstrap.css",

  # Application title
  titlePanel(title=div(img(src="picture.jpg"), "My Title")),
  sidebarLayout(
    sidebarPanel(
    )
  )
)
)