Create Semantic UI checkbox
Create Semantic UI checkbox
checkbox_input( input_id, label = "", type = NULL, is_marked = TRUE, style = NULL ) checkboxInput(inputId, label = "", value = FALSE, width = NULL) toggle(input_id, label = "", is_marked = TRUE, style = NULL)
input_id |
Input name. Reactive value is available under input[[name]]. |
label |
Text to be displayed with checkbox. |
type |
Type of checkbox: NULL, 'toggle' |
is_marked |
Defines if checkbox should be marked. Default TRUE. |
style |
Style of the widget. |
inputId |
same as |
value |
same as |
width |
The width of the input (currently not supported, but check |
The inputs are updateable by using updateCheckboxInput.
The following types are allowed:
NULL The standard checkbox (default)
toggle Each checkbox has a toggle form
slider Each checkbox has a simple slider form
if (interactive()){
ui <- shinyUI(
semanticPage(
p("Simple checkbox:"),
checkbox_input("example", "Check me", is_marked = FALSE),
p(),
p("Simple toggle:"),
toggle("tog1", "My Label", TRUE)
)
)
server <- function(input, output, session) {
observeEvent(input$tog1, {
print(input$tog1)
})
}
shinyApp(ui, server)
}Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.