R Shiny显示checkboxGroupInput水平

Question

如何checkboxGroupInput用R闪亮水平显示(内联块)？

Answer 1

你可以这样做:

checkboxGroupInput(inputId="test", label="Test", choices=1:4),
tags$style(type="text/css", HTML("#test>*{float: left; margin-right: 15px; height: 20px;} #test {height: 20px;}"))

或直接编辑css文件,请参阅https://groups.google.com/forum/#!topic/shiny-discuss/EMQV8NbA3MI

编辑

因为shiny 0.10.0,您可以使用inline参数进行水平布局:

library("shiny")
ui <- fluidPage(
  checkboxGroupInput(inputId="test", label="Test", choices=1:4, inline = TRUE)
)
server <- function(input, output) {

}
shinyApp(ui = ui, server = server)