r - 向 selectInput 添加选项

Question

我有一个 selectInput，其中显示了所有可能的选项。我想实现它，如果用户在框中键入内容并按回车键，它也将作为选项添加。

observeEvent(input$mykeypress, {

if(input$mykeypress == 13){

    print(input$selectBox)

}

我尝试了上面的代码，看看我的输入是否改变了，但似乎无论我在选择框中输入什么额外的东西，都没有被识别出来。

任何人都有想法让我可以识别用户输入的任何额外内容？

编辑:我正在考虑的另一个想法是创建一个 textInput，并用我在选择框中使用的所有值预填充它。这样的事情可能吗？

Answer 1

我最终弄明白了，因为 selectizeInput 只是围绕 selectize.js，在你的 selectizeInput 中你可以使用参数:options = list(create = TRUE)，用户可以很容易地添加单词。