# NOT RUN {
if (interactive()) {
library(shiny)
library(shinydashboard)
library(shinydashboardPlus)
shinyApp(
ui = dashboardPagePlus(
header = dashboardHeaderPlus(
enable_rightsidebar = TRUE,
rightSidebarIcon = "gears"
),
sidebar = dashboardSidebar(),
body = dashboardBody(),
rightsidebar = rightSidebar(),
footer = dashboardFooter(
left_text = "By Divad Nojnarg",
right_text = "Zurich, 2019"
),
title = "DashboardPage"
),
server = function(input, output) { }
)
}
# }
Run the code above in your browser using DataLab