r - 在shinydashboardPlus中调整左右侧边栏的高度

Question

我想知道是否有办法设置左右侧边栏 n 的高度shinydashboardPlus。我希望它们更短，例如它们现在的一半尺寸，以便让dashboardBody()覆盖物覆盖它们底部下方的整个空间。

library(shiny)
library(shinydashboard)
library(shinydashboardPlus)
shinyApp(
   ui = dashboardPage(
     options = list(sidebarExpandOnHover = TRUE),
     header = dashboardHeader(),
     sidebar = dashboardSidebar(minified = TRUE, collapsed = TRUE),
     body = dashboardBody(
     ),
     controlbar = dashboardControlbar(),
     title = "DashboardPage"
   ),
   server = function(input, output) { }
 )

标签： rshinyshinydashboardshinydashboardplus