pickerInput 默认选择所有选项

Question

我有大约十几个pickerInputs，每次我运行我闪亮的应用程序时，一切都设置为没有选择。我必须在输出工作之前手动选择所有内容，这有点烦人。有没有办法让pickerInput在每次应用程序运行时默认“全选”？

Answer 1

您可以使用pickerInput 的selected 参数。只需将您的所有选择传递给selected，它将在应用程序初始化时选择所有内容。将action-box 选项设置为True 还将默认构建全选和取消全选按钮，这将改善您当前的工作流程。这是一个最小的例子：

library(shiny)
library(shinyWidgets)

ui <- fluidPage(
  pickerInput(
    inputId = "my_input",
    label = "TEST",
    choices = 1:10,    # provide choices - integers from 1 to 10
    selected = 1:10,   # select - integers from 1 to 10 
    options = list(`actions-box` = TRUE),   # build buttons for collective selection
    multiple = T
  )
)

server <- function(input, output) {}

shinyApp(ui = ui, server = server)