Laraskan jarak baris dalam R Shiny: panduan langkah demi langkah

Question

Saya cuba melaraskan jurang antara baris dalam actionButton() yang dipaparkan dalam apl Berkilat seperti yang ditunjukkan di bawah dan berdasarkan kod MWE di bahagian bawah. Bagaimana untuk melaraskan jarak baris?

Hanya digunakan pada butang tindakan itu, bukan keseluruhan apl. Saya tidak begitu biasa dengan HTML atau CSS, tetapi jika saya ingat ada cara untuk menggunakan pemformatan HTML/CSS pada semua objek dalam aplikasi atau hanya pada objek tertentu dalam aplikasi: Saya berminat untuk menerapkannya pada hanya objek yang ditentukan.

Kod 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)

P粉237125700 · Answer

Anda boleh mengatasi peraturan css lalai berkilat line-height.

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;
}