shiny除了支持自带的标签,也可以像html一样编辑网页。
如下代码所示:
library(shiny)
ui <- shinyUI(fluidPage(
titlePanel("My Shiny App"),
sidebarLayout(
sidebarPanel(),
mainPanel(
p("p creates a paragraph of text."),
p("A new p() command starts a new paragraph. Supply a style attribute to change the format of the entire paragraph.", style = "font-family: 'times'; font-si16pt"),
strong("strong() makes bold text."),
em("em() creates italicized (i.e, emphasized) text."),
br(),
code("code displays your text similar to computer code"),
div("div creates segments of text with a similar style. This division of text is all blue because I passed the argument 'style = color:blue' to div", style = "color:blue"),
br(),
p("span does the same thing as div, but it works with",
span("groups of words", style = "color:blue"),
"that appear inside a paragraph.")
)
)
))
server <- shinyServer(function(input, output){
})
运行shinyAppp:
shinyApp(ui = ui, server = server)
可以在这里学习标签更多的使用方法:
http://shiny.rstudio.com/articles/html-tags.html
这里的标签样式也可以使用css进行美化,可以参阅谢老师的文章:
http://www.sohu.com/a/152089105_466874