Highlight active tabs

shiny
1

Hi all,

Wanted to check if we can highlight the active tabs . i mean when the user is in one tab ("agh"), that tab should be underlined. Similarly for other tab as well. Reprex below

app.R

shinyApp(
    fluidPage(
        br(),
        tabsetPanel(tabPanel("agh",
        numericInput("n", "Number to add", 5),
        actionButton("add", "Add"),
        verbatimTextOutput("sum", placeholder = TRUE)
    ),
    tabPanel("dfd"))),
    function(input, output, session) {
        nums <- numeric()
        
        c_sum <- eventReactive(input$add, {
            nums <<- c(nums, input$n)
            sum(nums)
        })
        
        output$sum <- renderText({
            c_sum()
        })
        
    }
)
2

This topic was automatically closed 54 days after the last reply. New replies are no longer allowed.