r - 按下闪亮仪表板中的切换按钮时完全隐藏侧边栏

Question

按下仪表板顶部的切换按钮时，有什么方法可以完全隐藏侧边栏？现在侧边栏的一部分仍然存在。

#app.r
library(shiny)
library(shinyWidgets)
library(shinydashboard)
library(shinydashboardPlus)

shinyApp(
  ui = dashboardPagePlus(
    header = dashboardHeaderPlus(

    ),
    sidebar = dashboardSidebar(),
    body = dashboardBody(
    ),
    rightsidebar = rightSidebar(),
    title = "DashboardPage"
  ),
  server = function(input, output) { }
)

标签： rshinydashboard

Answer 1

您可以添加sidebar_fullCollapse=TRUE到dashboardPagePlus命令中以完全折叠它