inst/vignettes-demos/skinSelector/app.R

In shinydashboardPlus: Add More 'AdminLTE2' Components to 'shinydashboard'

library(shiny)
library(shinydashboard)
library(shinydashboardPlus)

shinyApp(
  ui = dashboardPage(
    header = dashboardHeader(),
    sidebar = dashboardSidebar(collapsed = FALSE),
    body = dashboardBody(),
    controlbar = dashboardControlbar(collapsed = FALSE, skinSelector()),
    title = "Skin Selector"
  ),
  server = function(input, output) { }
)