如何消除閃爍之間流體行間頑固的空白？

Question

我在Shiny的UI界面中有兩個fluidRows。

我想頂行上面有一個小空格，但是我想消除行之間的任何空格。

• 我試過div，tags和風格參數，像margin: 0px和padding: 0px ...的分類，但我不能讓間距採取相應的行動。

  • 下面是一個例子：

    ui <- fluidPage(
    fluidRow(
    column(1,offset=0, 
         div(style = "font-size: 10px; padding: 14px 0px; margin:0%", 
          fluidRow(
          sliderInput(inputId = "sizeSlide", label = "Sizing", value = 10, min = 1,max = 20) 
          ) 
         ), 
         div(style = "font-size: 10px; padding: 0px 0px; margin:0px", 
          fluidRow(
          radioButtons(inputId = "greatORless", label = "DBH Limiter", choices = c(">", "<"), selected = ">") 
          )          
         ) 
        ) 
    ) 
    ) 
    

我得到的是這樣的：

^{（注意行間的大[不需要]空間）}

我想是這樣的：

^{（注意行之間的顯著更小的空間）}

如何做到這一點？

Answer 1

您可以在margin上使用負值，在這種情況下，使用margin-top:-2em僅影響頂部邊距。我更喜歡使用相對單位，但您可以使用像素而不是em。

library(shiny) 
ui <- fluidPage(
fluidRow(
column(1,offset=0, 
     div(style = "font-size: 10px; padding: 14px 0px; margin:0%", 
      fluidRow(
      sliderInput(inputId = "sizeSlide", label = "Sizing", value = 10, min = 1,max = 20) 
      ) 
     ), 
     div(style = "font-size: 10px; padding: 0px 0px; margin-top:-2em", 
      fluidRow(
      radioButtons(inputId = "greatORless", label = "DBH Limiter", choices = c(">", "<"), selected = ">") 
      )          
     ) 
    ) 
) 
) 

shinyApp(ui = ui, server = server)