R/parlak çoklu seçim kutusu - kaydırma çubuğu ekleme

Question

R/parlak web uygulaması yapıyorum. Çoktan seçmeli bir kutuya sahip olmak istiyorum (checkboxGroupInput() kullanıyorum, ancak alternatiflere açıkım). Bununla birlikte, seçeneklerin listesi uzun ve tercihler listesinin tamamında gezinmeyi sağlayan bir kaydırma çubuğu ile nispeten küçük bir seçenek kutusunda (bir seferde 5-6 seçeneği gösterir) içermek istiyorum.

Bunun bir yolu var mı? asgari örnek:

ui.R

library(shiny) 
choices = paste("A",1:30,sep="_") 

shinyUI(pageWithSidebar(

# Application title 
headerPanel("my title"), 
sidebarPanel( 
    checkboxGroupInput("inp", "choose any of the following", choices) 
), 
mainPanel(
    tableOutput("result") 

) 
)) 

server.R

library(shiny) 
shinyServer(function(input, output) { 
myInput <- reactive({ 
    input$inp 
}) 
output$result <- renderTable({ 
x = myInput() 
if(length(x)==0) { 
x = "No Choice Made" 
} 
matrix(x,ncol=1) 
}) 

}) 

Answer 1

Ben selectInput(..., multiple = TRUE) kullanarak hile yok olduğunu gördük.