2021年4月25日星期日

Increase distance between side-label and shiny widget in shiny dashboard

How can I increase the distance between label and input in a shiny dashboard?

library(shiny)    server <- shinyServer(function(input, output) { NULL })  ui <- shinyUI(    pageWithSidebar(             headerPanel("side-by-side"),             sidebarPanel(        fluidRow(          tags$head(            tags$style(type="text/css", "label.control-label, .selectize-control.single{ display: table-cell; text-align: center; vertical-align: middle; } .form-group { display: table-row;}")          ),          column(2),          column(4,                 selectInput(inputId = "options", label = "some text",                              choices = list(a = 0, b = 1))          )        )),      mainPanel(        fluidRow(           h3("bla bla")        ))    )  )  
https://stackoverflow.com/questions/67259664/increase-distance-between-side-label-and-shiny-widget-in-shiny-dashboard April 26, 2021 at 09:04AM

没有评论:

发表评论