Hide sidebar in default in shinydashboard

r shiny shinydashboard
Bangyou picture Bangyou · Feb 3, 2016 · Viewed 13.8k times · Source

I used shinydashboard to create my app. I would like to hide the sidedar in default on desktop environment (e.g. windows), but not to disable it. On the mobile device, the sidebar is hide in default. I think I need to change the css class, but don't know how to do it.

Thanks for any suggestions.

This is my playing codes:

library(shiny)

library(shinydashboard)
ui <- shinyUI(dashboardPage(
    dashboardHeader(),
    dashboardSidebar(),
    dashboardBody()
))

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

shinyApp(ui = ui, server = server)

Answer

Willem Bressers picture Willem Bressers · Dec 19, 2017

if you do a ?dashboardSidebar you probably see the usage, like this

dashboardSidebar(..., disable = FALSE, width = NULL, collapsed = FALSE)

So this should work

sidebar <- dashboardSidebar(
  collapsed = TRUE,
  sidebarMenu()
)

i'm not sure if this depends on your shinydashboard version but you could check/change that as well.

Related questions

Adding a company Logo to ShinyDashboard header

So just curious, is there any way to add a company logo to the header of a ShinyDashboard? As I am looking at the documentation, it describes changing the "logo" in the CSS, this is just configuring what goes in …

Read More
How to change color in shiny dashboard?

(cross post from shiny google groups) Could some one point me to the tag names that I have to modify the color of a shiny dashboard? Modified from http://rstudio.github.io/shinydashboard/appearance.html#long-titles this will change the …

Read More
How to display widgets inline in shiny

I have the below code to display the widgets inline(in same row) in shiny div(style="display:inline-block; width: 150px;height: 75px;",selectInput("ddllgra", "Function:",c('mean','median','sd','count','min','max'), selected='mean')), div(style="display:inline-block; width: 150…

Read More