如何在shinydashboard应用的浏览器标题栏添加自定义logo

前置准备 #

• 在你的Shiny应用根目录新建www文件夹（如果不存在）
• 将你的公司logo文件放入该文件夹，推荐使用ICO格式，命名为company_logo.ico（也支持PNG等常用图片格式）

代码修改方案 #

你只需要在dashboardBody的开头添加tags$head配置favicon的标签即可，完整示例代码如下：

library(shinydashboard)
library(shiny)

ui <- dashboardPage(
  title = "test me",
  dashboardHeader(),
  dashboardSidebar(),
  dashboardBody(
    # 自定义浏览器标题栏logo
    tags$head(
      tags$link(rel = "icon", type = "image/x-icon", href = "company_logo.ico")
    )
    # 其余页面内容写在下方即可
  )
)

server <- function(input, output) { }

shinyApp(ui, server)

注意事项 #

• 若使用PNG格式的logo，需将type参数修改为"image/png"，href参数对应你的logo文件名
• 配置完成后如果未立刻生效，使用浏览器强制刷新快捷键（Windows：Ctrl+F5，Mac：Command+Shift+R）清除缓存即可正常显示
• 如需适配苹果设备桌面快捷方式的图标，可额外添加tags$link(rel = "apple-touch-icon", href = "对应苹果图标路径")配置

内容的提问来源于stack exchange，提问作者Atmajitsinh Gohil