I have a basic shinydashboard in which I want the sidebar to be disabled when I am on the "Upload" tabpanel. Is this possible?
library(shinydashboard)
library(shiny)
ui <- dashboardPage(
dashboardHeader(),
dashboardSidebar(disable = TRUE),
dashboardBody(
tabsetPanel(
id = 'testingDPEtab',
tabPanel("Upload"),
tabPanel("Explore")
)
)
)
server <- function(input, output) { }
shinyApp(ui, server)