inst/examples/geodude/R/sidebar.R

In ghcarlalan/graveler: Builds standardized, modular shiny dashboard frameworks

sidebar <- function() {
  dashboardSidebar(
    sidebarMenu(
      menuItem("Quartet",tabName = "quartet",icon = icon("dice-four")),
      menuItem("Mtcars",tabName = "mtcars",icon = icon("car"))
    )
  )
}