title: Shiny: Combination of selectizeInput and textInput possible?
body: <p>I want to have a textInput in a shiny app, which shows the user possible autocompletions from a predefined list (or vector), when the user types sth. So the user can click on this and save time, but has also the possibility to write a text not in the predefined list (so similar to the way Google Search works).</p>
  
  <p>Here is an example. A user could type in "Ap" and can then click on "Apple". But it should also be possible to type in new inputs that are not in the predifined list, e.g. "Orange".</p>
  
  <p>Shinysky is similar to what I want (autocompletion in the textInput, but seems not to allow for new texts not in the choices vector.</p>
  
  <pre><code>library(shiny)
  library(shinysky) # install from github
  choices = c("Apple", "Banana", "Strawberry")
  
  ui &lt;- fluidPage(
    textInput.typeahead(
      id = "fruit", placeholder="type a fruit name", 
      local = data.frame(fruit = choices, info = c("info1", "info2", "info3")), 
      valueKey = "fruit", 
      tokens = c(1, 2, 3), 
      template = HTML("&lt;p class='repo-language'&gt;{{info}}&lt;/p&gt; &lt;p class='repo-name'&gt;{{fruit}}&lt;/p&gt; &lt;p class='repo-description'&gt;You need to learn more CSS to customize this further&lt;/p&gt;")
      ),
    verbatimTextOutput("value")
  )
  
   server &lt;- function(input, output, session) {
     # typeahead
    observe({
      input$fruit
      showshinyalert(session, "shinyalert3", sprintf("Typeahead Text Input Value: '%s'", 
                                                 input$fruit), "error")
    })
    output$value &lt;- renderText({input$fruit})
  }
  
  shinyApp(ui, server)
  </code></pre>
  
  <p>Maybe someone has an idea?</p>