Description Usage Arguments Details Examples
Create Semantic UI checkbox
1 2 3 4 5 6 7 8 9 10 11 |
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 type
s are allowed:
NULL The standard checkbox (default)
toggle Each checkbox has a toggle form
slider Each checkbox has a simple slider form
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 | 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)
}
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.