在 R Shiny 中調整行間距：逐步指南

Question

我正在嘗試調整在 Shiny 應用程式中呈現的 actionButton() 中的行之間的間隙，如下所示並根據底部的 MWE 程式碼。如何調整行間距？

僅適用於此操作按鈕，不適用於整個應用程式。我對HTML 或CSS 不是很熟悉，但如果我記得有一種方法可以將HTML/CSS 格式應用於應用程式中的所有物件或僅應用於應用程式中的指定物件：我有興趣僅將其應用於指定對象。

MWE程式碼：

library(shiny)

ui <- fluidPage(
  br(),
  actionButton(
    "add",
    HTML("Add <br/> column"), 
    width = '80px',
    style='padding:0px; font-size:100%')
  )

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

shinyApp(ui, server)

Answer 1

您可以覆蓋閃亮的預設 line-height css 規則。

actionButton(
    "add",
    HTML("Add 
 column"), 
    width = '80px',
    style='padding:0px; font-size:100%; line-height:1;') // notice addition of 'line-height:1;'
  )

/*this is default styling aplied by shiny*/

button {
  color: #333;
  background-color: #fff;
  display: inline-block;
  margin-bottom: 0;
  font-weight: 400;
  text-align: center;
  white-space: nowrap;
  vertical-align: middle;
  -ms-touch-action: manipulation;
  touch-action: manipulation;
  cursor: pointer;
  border: 1px solid #ccc;
  padding: 6px 12px;
  font-size: 14px;
  line-height: 1.42857143;
  border-radius: 4px;
  -webkit-user-select: none;
  -moz-user-select: none;
  -ms-user-select: none;
  user-select: none;
  cursor: pointer;
  -webkit-appearance: button;
  text-transform: none;
}

 Add 
 column