我使用Shiny中pickerInput
包中的shinyWidgets
函数来创建一个下拉菜单。例如我的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
中键入字母的搜索选项?
答案 0 :(得分:0)
答案有点晚,但是您的选项命名是错误的。在liveSearch
中更改live-search
,它将起作用。
options = list(`live-search`=TRUE)