Hey everyone,
I've searched for a lot of time in a lot of places, but couldn't find any solution to this.
I want an app with shinydashboard design like the following:
A few menuItems
with each a few menuSubItems
. My problem is that if one menuItem
is expanded, it'll collapse automatically once I expand another one.
I saw the startExpanded
option, and if I set it to TRUE
, all the menuItems
are expanded, but as soon as you (accidentally) collapse a menuItem
it's not possible to expand it again without the other tabs collapsing. Here is a reprex:
# reprex.R
library(shiny)
library(shinydashboard)
ui <- dashboardPage(
dashboardHeader(title="dashheader"),
dashboardSidebar(
sidebarMenu(
menuItem("MenuItemA", tabName="MIA",
menuSubItem("MenuSubItemA_1", tabName="MSIA_1")),
menuItem("MenuItemB", tabName="MIB",
menuSubItem("MenuSubItemB_1", tabName="MSIB_1"))
)
),
dashboardBody()
)
server <- function(input, output){}
shinyApp(ui, server)
Is there something I've missed or is this option not existing yet? Thanks a lot!
Paul