R: Change the value of a slider text input on the client

updateSliderTextInput {shinyWidgets} | R Documentation

## Change the value of a slider text input on the client

### Description

Change the value of a slider text input on the client

### Usage

    updateSliderTextInput(session, inputId, label = NULL, selected = NULL,
      choices = NULL, from_fixed = NULL, to_fixed = NULL)

### Arguments

`session` | The session object passed to function given to shinyServer.
`inputId` | The id of the input object.
`label` | The label to set.
`selected` | The values selected.
`choices` | The new choices for the input.
`from_fixed` | Fix the left handle (or single handle).
`to_fixed` | Fix the right handle.

### See Also

`sliderTextInput`

### Examples

    ## Not run:

    if (interactive()) {
    library("shiny")
    library("shinyWidgets")

    ui <- fluidPage(
      br(),
      sliderTextInput(
        inputId = "mySlider",
        label = "Pick a month :",
        choices = month.abb,
        selected = "Jan"
      ),
      verbatimTextOutput(outputId = "res"),
      radioButtons(
        inputId = "up",
        label = "Update choices:",
        choices = c("Abbreviations", "Full names")
      )
    )

    server <- function(input, output, session) {
      output$res <- renderPrint(str(input$mySlider))

      observeEvent(input$up, {
        choices <- switch(
          input$up,
          "Abbreviations" = month.abb,
          "Full names" = month.name
        )
        updateSliderTextInput(
          session = session,
          inputId = "mySlider",
          choices = choices
        )
      }, ignoreInit = TRUE)
    }

    shinyApp(ui = ui, server = server)
    }

    ## End(Not run)

[Package shinyWidgets version 0.4.3 Index]