Hello all,
I have a question about having a different sidebar panel for groups of tabs not just a different sidebar panel for each tab. This is what I've tried so far. The side bar panel is the same for the first 2 tabs but the 3rd tab that I want a different sidebar panel for does not appear.
Any suggestions?
Thank you in advance
library(shiny)
library(tidyverse)
ui <- fluidPage(fluid = TRUE,
,
mainPanel(
tabsetPanel(
sidebarLayout(
sidebarPanel(
selectInput("tt", "TT:", c("2","3"), selected = "2")
),
tabPanel("Plots"),
tabPanel("Test Panel")
))),
mainPanel(
tabsetPanel(
tabPanel("UU"))
)
server <- function(input, output, session){
}
shinyApp(ui,server)