shinydashboardPlus (version 0.7.0)

rightSidebarMenu: AdminLTE2 right sidebar menu

Description

Create a nice right sidebar menu.

Usage

rightSidebarMenu(...)

Arguments

...

Slot for rightsidebarMenuItem.

Examples

Run this code
# NOT RUN {
if (interactive()) {
 library(shiny)
 library(shinydashboard)
 shinyApp(
   ui = dashboardPagePlus(
     header = dashboardHeaderPlus(
       enable_rightsidebar = TRUE,
       rightSidebarIcon = "gears"
     ),
     sidebar = dashboardSidebar(),
     body = dashboardBody(),
     rightsidebar = rightSidebar(
       background = "dark",
       rightSidebarTabContent(
         id = 1,
         icon = "desktop",
         title = "Tab 1",
         active = TRUE,
         rightSidebarMenu(
          rightSidebarMenuItem(
           icon = menuIcon(
            name = "birthday-cake",
            color = "red"
           ),
           info = menuInfo(
            title = "Langdon's Birthday",
            description = "Will be 23 on April 24th"
           )
          ),
          rightSidebarMenuItem(
           icon = menuIcon(
            name = "user",
            color = "yellow"
           ),
           info = menuInfo(
            title = "Frodo Updated His Profile",
            description = "New phone +1(800)555-1234"
           )
          )
         )
       ),
       rightSidebarTabContent(
         id = 2,
         title = "Tab 2",
         textInput("caption", "Caption", "Data Summary")
       ),
       rightSidebarTabContent(
         id = 3,
         icon = "paint-brush",
         title = "Tab 3",
         numericInput("obs", "Observations:", 10, min = 1, max = 100)
       )
     ),
     title = "Right Sidebar"
   ),
   server = function(input, output) { }
 )
}

# }

Run the code above in your browser using DataLab