【发布时间】:2018-12-19 20:44:57
【问题描述】:
我有一个 UI 是 R Shiny 中的 projectdashboard。我希望能够输入文本/搜索框,并在我输入时显示与之关联的数据。
server <- function(input, output,session) {
output$ui_names = renderUI({
name_list = mydata()[,"names"]
pickerInput("name", label=h3(" Names:"),
choices = sort(unique(name_list)),options = list("actions-box" = TRUE,"live-search" = TRUE,"none-selected-text"='Select Names'),
selected = NULL,multiple = TRUE)
})
ui <- dashboardPage(
dashboardHeader(title=textOutput("title"),titleWidth = 1500),
dashboardSidebar(
uiOutput("ui_names")
)
shinyApp(ui = ui, server = server)
然而,这并没有给我预期的或工作的结果。如何在仪表板侧栏中放置一个文本/搜索栏,这将“实时搜索”我提供的数据。
【问题讨论】: