如何禁用闪亮的 bs4Dash 仪表板控制栏（右侧栏）

Question

控制 Shiny bs4Dash 仪表板上右侧栏的参数是什么。我对 https://rinterface.github.io/bs4Dash/articles/step-by-step.html 处的 dashboardControlbar 函数的阅读，据我所知是页面右侧的侧边栏，是设置 disable = T，其方式类似于 dashboardSidebar(disable = T) 控制左侧的外观侧边栏。

我已经设置了 controlbar = dashboardControlbar(disable = T) 但是在下面的 Shiny App 上，按下顶部的按钮时右侧栏仍然打开。感谢您提前提出任何建议。

编辑（响应 dashboardHeader 评论）：这个问题参考了 bs4Dash V2.0.0，可通过 github 获得。 https://github.com/RinteRface/bs4Dash 请注意 github 页面还推荐 github 版本的 htmltools 和 shiny。

library(shiny)
library(bs4Dash)


ui = dashboardPage(
  header = dashboardHeader(),
  sidebar = dashboardSidebar(
    disable = T
    ),
  body = dashboardBody(),
  controlbar = dashboardControlbar(
    disable = T
  ),
  title = ""
)

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

Answer 1

您可以删除控制栏参数以禁用它。

library(shiny)
library(bs4Dash)


ui = dashboardPage(
  header = dashboardHeader(),
  sidebar = dashboardSidebar(
    disable = T
  ),
  body = dashboardBody(),
  title = ""
)

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

如何禁用闪亮的 bs4Dash 仪表板控制栏（右侧栏）

How to Disable Shiny bs4Dash Dashboard controlbar (Right Sidebar)

dashboard

r

shiny

bs4dash