R: Change the value of a pretty toggle on the client

updatePrettyToggle {shinyWidgets} | R Documentation

## Change the value of a pretty toggle on the client

### Description

Change the value of a pretty toggle on the client

### Usage

    updatePrettyToggle(session, inputId, label = NULL, value = NULL)

### Arguments

`session` | The session object passed to function given to shinyServer.
`inputId` | The id of the input object.
`label` | The label to set for the input object.
`value` | The value to set for the input object.

### Examples

    ## Not run:

    if (interactive()) {

    library(shiny)
    library(shinyWidgets)

    ui <- fluidPage(
      tags$h1("Pretty toggle update value"),
      br(),

      prettyToggle(inputId = "toggle1",
                   label_on = "Checked!",
                   label_off = "Unchecked..."),
      verbatimTextOutput(outputId = "res1"),
      radioButtons(
        inputId = "update", label = "Value to set:",
        choices = c("FALSE", "TRUE")
      )

    )

    server <- function(input, output, session) {

      output$res1 <- renderPrint(input$toggle1)

      observeEvent(input$update, {
        updatePrettyToggle(session = session,
                           inputId = "toggle1",
                           value = as.logical(input$update))
      })

    }

    shinyApp(ui, server)

    }

    ## End(Not run)

[Package shinyWidgets version 0.4.3 Index]