html - 折叠大宽度的 Shiny Dashboard 侧边栏

Question

我试图隐藏一个宽度较大的 shinydashboard 侧边栏。问题是当我增加宽度时，侧边栏没有完全离开屏幕。

这是我正在尝试解决的问题的示例；

## R Code ##
library(shiny)
library(shinydashboard)

ui <- dashboardPage(
  dashboardHeader(),
  dashboardSidebar(),
  dashboardBody(tags$head(includeCSS("www/custom.css")))
)

server <- function(input, output) { }

shinyApp(ui, server)

CSS文件是

## CSS ##
.left-side, .main-sidebar {
   width: 50vw;
}

这是未折叠的侧边栏:

这是折叠的边栏:

如您所知，它没有隐藏 :(。关于我将如何解决这个问题，有什么建议吗？

Answer 1

利用ccss中的显示属性。

所以不要改变宽度，而是显示:无；这将调整你的其他元素的大小并相应地移动东西。请引用此 wc3 链接，例如:

https://www.w3schools.com/css/css_display_visibility.asp