如何在闪亮中方便地添加多个换行符？

Question

我想在我闪亮的应用程序中放置多个换行符。代替

br(),
br(),
br(),
...

有没有更方便的方法？谢谢。

Answer 1

我不知道这对您是否方便，但它可以节省您的打字时间。

linebreaks(n)重复<br/>n次并将其解析为HTML。

library(shiny)


linebreaks <- function(n){HTML(strrep(br(), n))}

ui <- fluidPage(

  titlePanel(
              p( 
                  h1("first sentence", align = "center"),

                  linebreaks(10),

                  h3("second sentence", align = "center")
                )
              )
  )