This function makes it a little easier to make Bootstrap-friendly panels;
it wraps htmltools::tags
for panels
bs_panel(
id = NULL,
panel_type = c("default", "primary", "success", "info", "warning", "danger"),
heading = NULL,
body = NULL,
...,
footer = NULL
)
character, unique identifier
character, one of the standard Bootstrap types
character (HTML) or htmltools::tagList(), content for the heading
character (HTML) or htmltools::tagList(), content for the body
character (HTML) or htmltools::tagList(), other content
character (HTML) or htmltools::tagList(), content for the footer
Object with S3 class, shiny.tag
, <div/>
library("htmltools")
bs_panel(
panel_type = "primary",
heading = tags$h3("title"),
body = tags$p("Some very important content")
)
#> <div class="panel panel-primary">
#> <h3>title</h3>
#> <p>Some very important content</p>
#> </div>