# NOT RUN {
if (interactive()) {
library(shiny)
library(shinydashboard)
shinyApp(
ui = dashboardPage(
dashboardHeader(),
dashboardSidebar(),
dashboardBody(
dashboardLabel("Label 1", status = "info"),
dashboardLabel("Label 2", status = "danger", style = "circle"),
dashboardLabel("Label 3", status = "success", style = "square")
)
),
server = function(input, output) { }
)
}
# }
Run the code above in your browser using DataLab