| Tabs.shinyInput | R Documentation |
Visit the documentation at https://mui.com/api/Tabs/ for more information.
Tabs.shinyInput(inputId, ..., value = defaultValue)
inputId |
the shiny input id |
... |
args to pass to element |
value |
the default value of the element |
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}")
})
}
)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.