如何根据使用shinyWidgets在pickerInput中键入字母来获得搜索选项？

Question

我使用 Shiny 中的shinyWidgets包中的pickerInput函数来创建下拉菜单。 例如我的ui.R一部分：

library(shiny)
library(data.table)
library(shinyWidgets)

.
.
#Rating
        pickerInput(
          inputId = "rate",
          label = "Rating:",
          choices = c(as.character(unique(datT2[order(rat.ord)]$Rating))),     
          selected = sort(unique(as.character(datT2$Rating ))),   
          options = list(`actions-box` = TRUE, 
                         `selected-text-format` = paste0("count > ", length(unique(as.character(datT2$Rating  )))-1) ,
                         `count-selected-text` = "Alle",liveSearch = TRUE, 
                         liveSearchPlaceholder= TRUE),   
          multiple = T
        )

在此功能之前，我只应用了正常功能：

#Rating
  selectInput("rate",
                "Rating:",
                choices = c("Alle",
                            sort(unique(as.character(datT2$Rating )))),     
 selected = "Alle", 
 multiple = TRUE)

在selectInput函数中，可以根据输入进行搜索，但不能像在pickerInput那样仅通过单击来取消选择所选项目。

如何根据在pickerInput键入字母来pickerInput搜索选项？

Answer 1

答案有点晚，但您的选项命名是错误的。 在live-search更改liveSearch它将起作用。

options = list(`live-search`=TRUE)

---

编辑

如果您有shinyWidgets >= 4.4您还可以使用函数pickerOptions来设置选项。 您可以通过调用?pickerOptions或检查此url来检查所有可能的选项。

两种方法的示例：

library(shiny)
library(shinyWidgets)

ui <- fluidPage(
  pickerInput('picker 1', 'picker1', c(1,2,3,4,5), options=pickerOptions(liveSearch=T)),
  pickerInput('picker 2', 'picker2', c(1,2,3,4,5), options = list(`live-search`=TRUE))
)

server <- function(input, output, session) {}

shinyApp(ui, server)