Установить расстояние (высоту) между виджетами - блестящее приложение

Question

У меня простое блестящее приложение

#ui.r
navbarPage(
  "Application",
  tabPanel("General",
           sidebarLayout(

             sidebarPanel(
               uiOutput("num8"),
               uiOutput("num9")
             ),

             mainPanel(



             )
           )

  )
)
#server.r
library(shiny)

server <- function(input, output,session) {

  output$c1<-renderUI({
    checkboxInput("ch1", 
                  h5("Person ID"), value = FALSE)
  })

  output$num8<-renderUI({

      textInput("nm8", 
                h6("Column"), 
                value = 1)


  })
  output$num9<-renderUI({

    textInput("nm9", 
              h6("Column"), 
              value = 1)


  })




}

Мне было интересно, можно ли уменьшить расстояние по высоте между ними. Я думаю, это похоже на сокращение расстояния между двумя виджетами в одном столбце. Я знаю, как это сделать, когда они в одной строке здесь

Answer 1

Трудно точно сказать, что вы хотите, но хорошим началом было бы добавить следующее правило CSS.

form-group.shiny-input-container {
    margin-bottom: 0;
}

надеюсь, это поможет !!