Tabs

Visit the documentation at https://mui.com/api/Tabs/ for more information.

Usage

Tabs.shinyInput(inputId, ..., value = defaultValue)

Arguments

inputId

the shiny input id

...

args to pass to element

value

the default value of the element

Examples

library(shiny.mui)
library(shiny)

if (interactive()) {
  shinyApp(
    ui = div(
      Tabs.shinyInput(
        "tabs",
        value = "first",
        Tab(value = "first", label = "First"),
        Tab(value = "second", label = "Second"),
        Tab(value = "third", label = "Third")
      ),
      textOutput("text_value")
    ),
    server = function(input, output) {
      output$text_value <- renderText({
        glue:glue("Value: {input$tabs}")
      })
    }
  )
}