selectizeInput ile, her seçimden sonra kapanış seçeneklerinin listesini durdurun

Question

Parlak bir uygulamaya bir selectizeInput widget'ı eklemeye çalışıyorum. Bununla birlikte, davranışının bir yönü sorunludur: her seçim yaptığımda, seçenekleri içeren kutu kapanır.

Örnek uygulamaya bir göz attım: http://shiny.rstudio.com/gallery/selectize-examples.html. Özellikle, 2 numaralı giriş: Çoklu seçim. Seçim penceresi bu örnekte açık kalır, ancak davranışta varyansı açıklayacak olan bu kod ile benimki arasında hiçbir fark göremiyorum. Bir tekrarlanabilir Örnekte

, birlikte aşağıdaki kod koyduk:

ui <- fluidPage(uiOutput("example")) 

    server <- function(input, output, session){ 

        output$example <- renderUI({ 

             selectizeInput(
                inputId="people", 
                label=NULL, 
                choices=paste("A", 1:50, sep="_"), 
                multiple = TRUE, 
                selected=input$people 
                ) 

               }) 

} # close server 

shinyApp(ui = ui, server=server) 

Benim tahminim ben belirgin bir şey eksik olduğunu, bu yüzden burada bilen birisi için kolay bir cevap için bir şans Shiny etrafında yollarını. Herhangi bir yardım büyük takdir edilecektir.

Answer 1

selected=input$people satırını kaldırdığınızda, amaçlandığı gibi çalışır.