Shinydashboard 仪表板侧边栏宽度设置答案

【问题标题】：Shinydashboard dashboardSidebar Width SettingShinydashboard 仪表板侧边栏宽度设置
【发布时间】：2015-05-20 13:44:33
【问题描述】：

我在 R (RRO 8.0.3) 中使用 shiny (0.12.0) 和 shinydashboard (0.4.0) CRAN-R 3.1.3) 来创建一个 UI，我很喜欢我所看到的。不过，我希望能够控制dashboardSidebar 项目的宽度，因为我需要在其中放置一些宽选择器框。

ui <- dashboardPage(
  dashboardHeader(title = "My Dashboard"),
  dashboardSidebar(#stuffhere)  #would like a width param setting
  dashboardBody()
)

有没有办法做到这一点（一些隐藏良好的宽度参数，或嵌入的 css），还是我必须回到无聊的闪亮并从头开始构建它？

【问题讨论】：

标签： css r width shiny

【解决方案1】：

侧边栏的宽度由 .left-side 类上的 CSS 设置，所以你可以这样做：

dashboardPage(
  dashboardHeader(title = "My Dashboard"),
  dashboardSidebar( tags$style(HTML("
      .main-sidebar{
        width: 300px;
      }
    ")),selectInput("id","Select a survey",choices=c("Very very very very long text","text"))), 
    dashboardBody()
  )

【讨论】：

这对你有用吗？它并没有改变我的格式。我会尝试一些变化。
对我有用，也许我们没有相同的shinydashboard 版本，我正在运行shinydashboard_0.2.3 和shiny_0.11.1.9005
.left-side 不起作用。对页面进行了检查，使用 .main-sidebar{ ... } 进行了同样的尝试，并且成功了！
是的，我更新了我的包，侧边栏的类现在是main-sidebar
为了让一切看起来正确，我不得不将以下 css 添加到 dashboardBody 函数：tags$head(tags$style(HTML(' .main-sidebar{ width: 300px; } .main-header > .navbar { margin-left: 300px; } .main-header .logo { width: 300px; } .content-wrapper, .main-footer, .right-side { margin-left: 300px; } ')))

【解决方案2】：

旧答案可能仍然有效，但现在还有一个width = ... 选项。看： https://rstudio.github.io/shinydashboard/appearance.html#sidebar-width。这是那里显示的示例代码：

shinyApp(
  ui = dashboardPage(
    dashboardHeader(
      title = "Title and sidebar 350 pixels wide",
      titleWidth = 350
    ),
    dashboardSidebar(
      width = 350,
      sidebarMenu(
        menuItem("Menu Item")
      )
    ),
    dashboardBody()
  ),
  server = function(input, output) { }
)

【讨论】：