Select {shiny.blueprint} | R Documentation |
Select
Description
Documentation: https://blueprintjs.com/docs/#select/select2
Usage
Select(...)
Select.shinyInput(
inputId,
items,
selected = NULL,
...,
noResults = "No results."
)
Arguments
... |
Component props and children. See the official Blueprint docs for details. |
inputId |
The |
items |
A list of options (character vector or list containing |
selected |
Initialy selected item |
noResults |
Message when no results were found |
Value
Object with shiny.tag
class suitable for use in the UI of a Shiny app.
Examples
library(shiny)
library(shiny.blueprint)
top5Films <- list(
list(text = "The Shawshank Redemption", label = 1994),
list(text = "The Godfather", label = 1972),
list(text = "The Godfather: Part II", label = 1974),
list(text = "The Dark Knight", label = 2008),
list(text = "12 Angry Men", label = 1957)
)
ui <- function(id) {
ns <- NS(id)
tagList(
H3("Select"),
Select.shinyInput(
inputId = ns("select"),
items = paste("Option", LETTERS),
selected = "Option C",
noResults = "No options."
),
uiOutput(ns("select_output")),
H3("Select with labels"),
Select.shinyInput(
inputId = ns("select_lab"),
items = top5Films,
selected = "The Dark Knight"
),
uiOutput(ns("select_lab_output"))
)
}
server <- function(id) {
moduleServer(id, function(input, output, session) {
output$select_output <- renderText(input$select$text)
output$select_lab_output <- renderText(input$select_lab$text)
})
}
if (interactive()) shinyApp(ui("app"), function(input, output) server("app"))
[Package shiny.blueprint version 0.3.0 Index]