pickerInput默认选择所有选项

Question

我有十几个pickerInputs，每次我运行我的闪亮的应用程序，所有的东西都被设置为没有选择。在输出开始工作之前，我必须手动选择所有内容，这有点烦人。pickerInput是否可以在每次运行应用程序时默认“选择所有”？

Answer 1

您可以使用selected参数的pickerInput。只需将所有选择传递给selected，它将在应用程序初始化时选择所有选项。将action-box选项设置为True还将生成Select &，默认情况下取消选择所有按钮，这将改善您当前的工作流。下面是一个很小的例子：

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)