Create a vertical container for descriptionBlock.
boxPad(..., color = NULL, style = NULL)
... | any element such as descriptionBlock. |
---|---|
color | background color: see here for a list of valid colors https://adminlte.io/themes/AdminLTE/pages/UI/general.html. |
style | custom CSS, if any. |
David Granjon, dgranjon@ymail.com
if (interactive()) { library(shiny) library(shinydashboard) library(shinydashboardPlus) shinyApp( ui = dashboardPage( dashboardHeader(), dashboardSidebar(), dashboardBody( box(title = "Box with right pad", status = "warning", fluidRow( column(width = 6), column( width = 6, boxPad( color = "green", descriptionBlock( header = "8390", text = "VISITS", rightBorder = FALSE, marginBottom = TRUE ), descriptionBlock( header = "30%", text = "REFERRALS", rightBorder = FALSE, marginBottom = TRUE ), descriptionBlock( header = "70%", text = "ORGANIC", rightBorder = FALSE, marginBottom = FALSE ) ) ) ) ) ), title = "boxPad" ), server = function(input, output) { } ) }