设置小部件之间的距离（高度）是一个闪亮的应用程序

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)


  })




}

我想知道是否可以减小它们之间的高度距离。我想这就像缩短同一列中两个小部件之间的距离。我知道当他们在同一行here

中时该怎么做

Answer 1

很难准确地说出您想要什么，但是一个好的开始是添加以下css规则。

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

希望这会有所帮助！