0

This is my code:

library(shiny)

ui <- fluidPage(
  uiOutput('tabset_panels'),

  textOutput('text')
)

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

  output$tabset_panels <- renderUI({
    tabsetPanel(
      tabPanel(
        title ='a'
      ),

      tabPanel(
        title ='b'
      ),

      tabPanel(
        title ='c'
      ),

      tabPanel(
        title ='d'
      ),

      tabPanel(
        title ='e'
      )


    )
  })

  output$text <- renderText({

  })
}

shinyApp(ui, server)

I would like to once I click on a bellow the letter ais displayed and so on for all the others panels. So when I click on bpanel the letter b appears below and so on.So when I click on cpanel the letter c appears below and so on.So when I click on dpanel the letter d appears below and so on.

Any help?

Joana Baptista
  • 1
  • 1
  • 1
    Does this answer your question? [How do I access/print/track the current tab selection in a Shiny app?](https://stackoverflow.com/questions/38863215/how-do-i-access-print-track-the-current-tab-selection-in-a-shiny-app) – I_O Mar 06 '23 at 22:34

0 Answers0