rightSidebarMenu: AdminLTE2 right sidebar menu

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

Description

Create a nice right sidebar menu.

Usage

rightSidebarMenu(...)

Arguments

...	Slot for rightsidebarMenuItem.

Author(s)

David Granjon, [e-mail]

Examples

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 [phone]"
           )
          )
         )
       ),
       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) { }
 )
}

dsciencelabs/shinydashboardPlus documentation built on Dec. 20, 2021, 2:10 a.m.