FreesearchR/reference/colorSelectInput.md

A selectizeInput customized for named vectors of color names supported by generate_colors

A selectizeInput customized for named vectors of color names supported by generate_colors

Usage

colorSelectInput(
  inputId,
  label,
  choices,
  selected = NULL,
  previews = 4,
  ...,
  placeholder = ""
)

Arguments

• inputId:

  passed to selectizeInput

• label:

  passed to selectizeInput

• choices:

  A named vector from which fields should be populated

• selected:

  default selection

• previews:

  number of preview colors. Default is 4.

• ...:

  passed to selectizeInput

• placeholder:

  passed to selectizeInput options

• onInitialize:

  passed to selectizeInput options

Value

a selectizeInput dropdown element

Examples

if (shiny::interactive()) {
top_palettes <- c(
"Perceptual (blue-yellow)"   = "viridis",
"Perceptual (fire)"          = "plasma",
"Colour-blind friendly"      = "Okabe-Ito",
"Qualitative (bold)"         = "Dark 2",
"Qualitative (paired)"       = "Paired",
"Sequential (blues)"         = "Blues",
"Diverging (red-blue)"       = "RdBu",
"Tableau style"              = "Tableau 10",
"Pastel"                     = "Pastel 1",
"Rainbow"                    = "rainbow"
)
  shinyApp(
    ui = fluidPage(
    titlePanel("Color Palette Select Test"),
    colorSelectInput(
      inputId  = "palette",
      label    = "Color palette",
      choices  = top_palettes,
      selected = "viridis"
    ),
    verbatimTextOutput("selected")
    ),
    server = function(input, output, session) {
    output$selected <- renderPrint(input$palette)
    }
  )
}
#> Error: 'interactive' is not an exported object from 'namespace:shiny'