Add a remove button to each item of a selectize input

selectize-remove_button.R

library(shiny)
ui <- fluidPage(
  selectizeInput(
    inputId = "select", 
    label = "Select", 
    choices = NULL,
    multiple = TRUE,
    options = list(
      plugins = list("remove_button"),
      create = TRUE,
      persist = TRUE # keep created choices in dropdown
    )
  ),
  verbatimTextOutput("out")
)

server <- function(input, output){
  output$out <- renderPrint({
    input$select
  })
}

shinyApp(ui, server)

Thanks a lot!

So great, thank you very much !