R闪亮对齐100个radioGroupButtons 10x10

Question

我有以下示例，它呈现 100 个反应式单选按钮。

library(shiny)
library(shinyWidgets)    
if (interactive()) {
  
  ui <- fluidPage(
    tags$h1("radioGroupButtons examples"),
    
    radioGroupButtons(
      individual = T, selected = "",status = "danger",
      inputId = "somevalue1",
      label = "Make a choice: ",
      choices = rep("x", 100)
    ),
    verbatimTextOutput("value1"),
  )
  server <- function(input, output) {
    
    output$value1 <- renderPrint({ input$somevalue1 })
    
  }
  shinyApp(ui, server)
  
}

我现在想 arrange/align 10 列 10 行的按钮，但我不知道我应该针对哪个 CSS class 这样做。

Answer 1

您可以使用 CSS flexbox 或 grid

Flexbox 示例：

#content {
    display: flex;
    flex-wrap: wrap;
    width: 250px;
}

#content>input {
    width: 25px;
    height: 25px;
}

网格示例：

#content {
    display: grid;
    grid-template-columns: repeat(10, 1fr);
}

R闪亮对齐100个radioGroupButtons 10x10

R shiny align 100 radioGroupButtons 10x10

css

r

alignment

shiny