View source: R/input-materialswitch.R
materialSwitch | R Documentation |
A toggle switch to turn a selection on or off.
materialSwitch(
inputId,
label = NULL,
value = FALSE,
status = "default",
right = FALSE,
inline = FALSE,
width = NULL
)
inputId |
The |
label |
Input label. |
value |
TRUE or FALSE. |
status |
Color, must be a valid Bootstrap status : default, primary, info, success, warning, danger. |
right |
Should the the label be on the right? default to FALSE. |
inline |
Display the input inline, if you want to place buttons next to each other. |
width |
The width of the input, e.g. |
A switch control that can be added to a UI definition.
updateMaterialSwitch
, switchInput
if (interactive()) {
library(shiny)
library(shinyWidgets)
ui <- fluidPage(
tags$h3("Material switch examples"),
materialSwitch(inputId = "switch1", label = "Night mode"),
verbatimTextOutput("value1"),
materialSwitch(inputId = "switch2", label = "Night mode", status = "danger"),
verbatimTextOutput("value2")
)
server <- function(input, output) {
output$value1 <- renderText({ input$switch1 })
output$value2 <- renderText({ input$switch2 })
}
shinyApp(ui, server)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.