Description Usage Arguments Author(s) Examples
Create an enhanced box
1 2 3 4 5 6 7 8 9 10 11 12 13 |
... |
body content. |
title |
box title. |
icon |
header icon, if any. Should be written like "fa fa-times". |
gradientColor |
color of the box: see here for a list of valid colors https://adminlte.io/themes/AdminLTE/pages/UI/general.html. |
boxToolSize |
size of the toolbox: choose among "xs", "sm", "md", "lg". |
footer |
the box footer. |
width |
box width (between 1 and 12). |
height |
box height. |
collapsible |
If TRUE, display a button in the upper right that allows the user to collapse the box. |
closable |
If TRUE, display a button in the upper right that allows the user to close the box. |
footer_padding |
TRUE by default: whether the footer has margin or not. |
David Granjon, dgranjon@ymail.com
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 | if (interactive()) {
library(shiny)
library(shinydashboard)
shinyApp(
ui = dashboardPage(
dashboardHeader(),
dashboardSidebar(),
dashboardBody(
gradientBox(
title = "My gradient Box",
icon = "fa fa-th",
gradientColor = "teal",
boxToolSize = "sm",
footer = sliderInput(
"obs",
"Number of observations:",
min = 0, max = 1000, value = 500
),
"This is a gradient box"
),
gradientBox(
title = "My gradient Box",
icon = "fa fa-heart",
gradientColor = "maroon",
boxToolSize = "xs",
closable = TRUE,
footer = "The footer goes here. You can include anything",
"This is a gradient box"
)
),
title = "gradientBox"
),
server = function(input, output) { }
)
}
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.