Skip to contents

Create Semantic UI checkbox

Usage

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)

Arguments

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 input_id

value

same as is_marked

width

The width of the input (currently not supported, but check style)

Details

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

Examples

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)
}