如何移除shinydashboardPlus应用中残留的logo头部/侧边栏头部

你仅设置侧边栏宽度为0时，shinydashboard默认预留的头部logo区域、导航栏左侧边距、主体内容左侧边距仍然存在，所以会出现残留。新增对应CSS规则覆盖默认样式即可解决，完整可运行代码如下：

library(shiny)
library(shinydashboard)
library(shinydashboardPlus)
library(shinyWidgets)
library(shinyjs)

header <- dashboardHeader(tags$li(class = "dropdown",
                                  sidebarMenu(
                                    id = "mysearch",
                                    menuItem(
                                      text = "Main",
                                      tabName = "main",
                                      icon = icon("home")
                                    )
                                  )))

# 也可以直接设置disable = TRUE替代width设置，效果一致
sidebar <- dashboardSidebar(
  width = "0px"
)

body <- dashboardBody(
  # 新增CSS样式覆盖默认布局
  tags$head(
    tags$style(HTML("
      /* 隐藏头部左侧logo区域 */
      .main-header .logo {
        display: none;
      }
      /* 清除导航栏左侧预留边距 */
      .main-header .navbar {
        margin-left: 0 !important;
      }
      /* 彻底隐藏侧边栏元素 */
      .main-sidebar, .left-side {
        display: none !important;
      }
      /* 清除内容区域左侧预留边距 */
      .content-wrapper, .right-side {
        margin-left: 0 !important;
      }
    "))
  )
)

ui <- dashboardPage(
  header = header,
  sidebar = sidebar,
  body = body,
  footer = dashboardFooter(
    left = tags$b(
      icon("envelope"),
      tags$a(href = "mailto:", "myemail@email.no"),
      icon("home"),
      tags$a(href = "https://somesite.no", "www.somesite.no/")
    ),
    right = ""
  )
)

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

shinyApp(ui, server)

修改后的代码不会再出现侧边栏相关的残留显示，也不会影响你已经添加的头部菜单和页脚功能。

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