如何使用R闪亮水平显示checkboxGroupInput
(内联块)?
答案 0 :(得分:18)
你可以这样做:
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)