如何隐藏Shiny应用修改TitlePanel后导航面板下方出现的标签数字？

你代码里的冗余数字来自两处错误用法：

• 不需要在navbarPage内嵌套titlePanel，navbarPage本身自带title、windowTitle原生参数，完全可以满足窗口标题、导航栏标题的配置需求
• 你将用于配置favicon的tags$head对象传给了titlePanel的title参数，这类头部配置对象本应放在页面头部层级，错误放到正文渲染位置时，Shiny会将其内部结构的长度值作为文本输出，就是你看到的多余数字
• 补充：你当前favicon的type属性写法不符合标准，也可能导致部分浏览器无法正常加载图标

直接调整UI结构，将favicon配置提到UI顶层，使用navbarPage原生参数配置标题即可，参考代码如下：

library(shiny)
library(shinythemes)

ui <- fluidPage(
  # favicon配置放在顶层tags$head中
  tags$head(
    tags$link(
      rel = "shortcut icon",
      href = "images/image.png",
      type = "image/x-icon"
    )
  ),
  # 直接使用navbarPage原生参数配置标题
  navbarPage(
    title = "Name",
    windowTitle = "Name",
    selected = "home",
    theme = shinytheme("readable"),
    fluid = TRUE,
    # 后续添加你的业务tabPanel即可
    tabPanel("home", "首页内容")
  )
)

修改后favicon、窗口标题、导航栏标题均会正常显示，不会再出现多余数字。

内容的提问来源于stack exchange，提问作者Atilla Colak