Nothing
knitr::opts_chunk$set( collapse = TRUE, comment = "#>" )
{shinydashboardPlus}
brings tons of new elements to include in boxes or elsewhere. Some of them has partially been described in the previous vignette.
descriptionBlock()
is a sub-container that may be included in any box()
.
It is convenient to display metrics.
library(shiny) library(shinydashboard) library(shinydashboardPlus) shinyApp( ui = dashboardPage( dashboardHeader(), dashboardSidebar(), dashboardBody( box( solidHeader = FALSE, title = "Status summary", background = NULL, width = 4, status = "danger", footer = fluidRow( column( width = 6, descriptionBlock( number = "17%", numberColor = "green", numberIcon = icon("caret-up"), header = "$35,210.43", text = "TOTAL REVENUE", rightBorder = TRUE, marginBottom = FALSE ) ), column( width = 6, descriptionBlock( number = "18%", numberColor = "red", numberIcon = icon("caret-down"), header = "1200", text = "GOAL COMPLETION", rightBorder = FALSE, marginBottom = FALSE ) ) ) ) ), title = "Description Block" ), server = function(input, output) { } )
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.