用于在Shiny中选择多个参数的checkboxGroupInput的替代方法？

Question

我有一个闪亮的应用程序，用于分析30年的气候数据。我希望用户能够选择他们希望在30年内尽可能多地相互绘制的年份。显然，可以使用checkboxGroupInput，但是，在屏幕上显示30个复选框在视觉上并不令人满意。

是否有其他选择（例如下拉的“多项选择”）？

Answer 1

普通的选择是将selectInput与multiple = TRUE一起使用。如果您不介意使用外部软件包，则bwc的答案会派上用场。请参见以下演示：

library(shiny)
library(shinyWidgets)

ui <- fluidPage(
  sidebarLayout(
    sidebarPanel(selectInput("choiceSelectize", "Choose one or more:", choices = 1:10, multiple = TRUE),
                 pickerInput("choicePicker", "Choose one or more:", choices = 1:10, multiple = TRUE)),
    mainPanel("Plain shiny Select Input:", verbatimTextOutput("outSelectize"),
              "ShinyWidgets Picker Input:", verbatimTextOutput("outPicker"))
  )
)

server <- function(input, output) {

  output$outSelectize <- renderPrint({
    input$choiceSelectize
  })

  output$outPicker <- renderPrint({
    input$choicePicker
  })
}

shinyApp(ui, server)

Answer 2

看起来像shinyWidgets包中的pickerInput（）或checkboxGroupButtons可以解决问题。