在我选择并删除条目之前,R Shiny 中的 selectizeInput() 不允许输入

selectizeInput() in R Shiny doesn't allow typing until I have selected and deleted an entry

我的 ui 中有一个 selectizeInput() 框,我的服务器函数中有服务器端 selectize updateSelectizeInput()。我希望用户能够在输入框中输入建议,但在我选择然后删除条目之前,它不会让我输入任何内容。在我的应用程序的完整版本中,有几千个选项,因此服务器端更新是必要的,滚动选项是不切实际的。我隔离了我的应用程序的那部分,在下面输入。

ui <- fluidPage(
  selectizeInput(inputId = 'cwdsearchscanid', label = 'ScanID Lookup',
                 choices = NULL,
                 selected = NULL,
                 options = list(placeholder = 'Enter ScanID')
  )
)

server <- function(input, output, session) {
  updateSelectizeInput(session, 'cwdsearchscanid', choices = c('', '1234', '2345', '3456', '4567', '5678', '6789', '7890', '8901', '9012', '0123'), server = T)
}

shinyApp(ui = ui, server = server)

你应该使用 selected = character(0) 如下所示

updateSelectizeInput(session, 'cwdsearchscanid',
                     choices = c('', '1234', '2345', '3456', '4567', '5678', '6789', '7890', '8901', '9012', '0123'),
                     selected = character(0),
                     server = TRUE)