shinydashboard与shinydashboardPlus侧边栏最小化标题显示差异问题

解决方法 #

可以通过添加自定义CSS覆盖shinydashboardPlus的默认样式规则，在保留侧边栏最小化仅显示图标的特性同时，避免标题被截断。
核心逻辑：侧边栏进入最小化状态时，页面body标签会自动添加.sidebar-mini类，我们针对该状态下的顶部标题栏logo设置固定最小宽度，即可阻止其被压缩截断。

完整可运行代码如下：

library(shiny)
library(shinydashboard)
library(shinydashboardPlus)

shinyApp(
  ui = dashboardPage(
    dashboardHeader(title = "Example"),
    dashboardSidebar(
      minified = TRUE, # 开启侧边栏最小化仅显示图标特性
      sidebarMenu(
        menuItem('Menu1', tabName = 'Menu1', 
                 icon = icon('folder-open')),
        menuItem('Menu2', tabName = 'Menu2',
                 icon = icon('code-branch'))
      )
    ),
    dashboardBody(
      # 自定义CSS修复标题截断问题
      tags$style(HTML("
        .sidebar-mini .main-header .logo {
          /* 数值可根据自身标题长度调整，默认和侧边栏展开宽度一致即可 */
          min-width: 230px !important;
        }
      "))
    )
  ),
  server = function(input, output) { }
)

如果你的应用标题长度更长，仅需要调整CSS中min-width的数值到能完整展示标题即可，不会影响侧边栏仅显示图标的收缩效果。

内容的提问来源于stack exchange，提问作者KirkD-CO