selectInput_dsfr

selectInput_dsfr(inputId, label, choices, selected = NULL)

Arguments

inputId

id de l'input

label

label du bouton

choices

Liste des valeurs à sélectionner (si les éléments de la liste portent un nom, c'est ce nom qui est affiché à l'utilisateur et non la valeur)

selected

Element selectionné

Valeur de retour

html

Examples

## Only run examples in interactive R sessions
if (interactive()) {
  library(shiny)
  library(shinygouv)

  ui <- fluidPage_dsfr(
    header = header_dsfr(
      intitule = "Intitule",
      officiel = "Officiel",
      nom_site_service = "Nom du site / service",
      baseline = "baseline - precisions sur l organisation",
      class = "fr-m-1w"
    ),
    title = "Exemple",
    fluidRow_dsfr(
      # sans vecteur nommé
selectInput_dsfr(
  inputId = "myselectInput",
  label = "Mon label",
  choices = c(
    "cyl",
    "am",
    "gear"
  )
),
fluidRow_dsfr(
  # avec un vecteur nommé et une valeur sélectionnée
selectInput_dsfr(
  inputId = "myselectInput2",
  label = "Mon label2",
  choices = c(
    "Cylinders" = "cyl",
    "Transmission" = "am",
    "Gears" = "gear"
  ),
  selected = "gear"
)
  
)

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

  shinyApp(ui, server)
}