闪亮的用户界面 - 如何使文字在点符号

Question

我的原始代码： fluidRow( h4("• xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx.")

看起来像

•xxxxxxxxxxxxxxxxxxxxxxx

XXXXXX

如上所述，我有一个点符号，如＆＃34;•＆＃34;并在其后面有多行描述。有人可以告诉我如何使点标后面的描述从同一个地方开始，就像它在＆＃34; Microsoft Word＆＃34;应用

由于

Answer 1

听起来您希望h4标题看起来像bulleted lists。您还希望长文本为indented the same amount as the first line。我们可以通过添加CSS来实现这一目标。

试试这个：

library(shiny)
css <- HTML(
        "h4{
                display: list-item;
                list-style-type: disc;
                list-style-position: inside;
                text-indent: -1em;
                padding-left: 1em;}"
        )
ui <- fluidPage(
        tags$head(tags$style(css)),
        fluidPage(
                h1("Bullet h4 Headings"),
                h4("Lorem ipsum dolor sit amet, consectetur adipiscing elit, 
                   sed do eiusmod tempor incididunt ut labore et dolore magna aliqua. 
                   Ut enim ad minim veniam, quis nostrud exercitation ullamco laboris 
                   nisi ut aliquip ex ea commodo consequat. Duis aute irure dolor in 
                   reprehenderit in voluptate velit esse cillum dolore eu fugiat 
                   nulla pariatur. Excepteur sint occaecat cupidatat non proident, 
                   sunt in culpa qui officia deserunt mollit anim id est laborum.")
        )
)

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

}
shinyApp(ui = ui, server = server)