如何从 shinydashboardPlus 中删除徽标标题/侧边栏标题？答案

【问题标题】：How to remove logo header/sidebar header from shinydashboardPlus?如何从 shinydashboardPlus 中删除徽标标题/侧边栏标题？
【发布时间】：2021-09-17 23:47:47
【问题描述】：

我正在使用 shinydashboardPlus，因为我想使用 dashboardFooter，但我删除了侧边栏。问题是徽标标题/侧边栏标题仍然存在，并且还没有找到删除它的方法。我试图通过更改我的 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")
                                    )
                                  )))


sidebar <- dashboardSidebar(
  width = "0px"
 )



body <- dashboardBody()



ui <- (dashboardPage(
  header = header,
  sidebar = sidebar,
  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)

有什么想法吗？

【问题讨论】：

标签： css r shiny shinydashboard shinydashboardplus

【解决方案1】：

试试titleWidth=0，就像

header <- dashboardHeader(
  titleWidth=0,
  tags$li(class = "dropdown",...)
)

【讨论】：