放大selectInput的选项列表

Question

我的闪亮应用程序中有一个多选selectInput。存在50种可能的选择，并且一次显示50种选择中的默认4（参见屏幕截图）。如何将此列表放大到例如15个选项？

编辑：带有Vincent答案的代码。 （不起作用）

sidebarPanel( 

    uiOutput("dataselect"),
    tags$style(type='text/css', "#view_vars { height: 180px; }"),

)

Answer 1

将以下内容放入app的www目录中的css文件中：

#view_vars { 
  height: 180px; 
  margin-bottom: 15px;
}

其中view_vars是您的selectInput的名称。增加高度值以显示更多变量。

编辑：您还可以在ui.R中包含以下内容，但随着您的应用程序的增长，建议将样式选项放在css文件中。

标记$ style（type ='text / css'，“＃view_vars {height：180px;}”）

Answer 2

您可以使用selectInput函数的“ size”参数。我已按照您在以下代码中的要求将其设置为15。大小与多选（multiple = TRUE）兼容。

selectInput(inputId = "YourID", label = "YourLabel", choices = seq(1:50), 
            selected = NULL, multiple = TRUE, selectize = FALSE, width = NULL, size = 15)

如文档here

中所述