accordion: Create simple accordion

In shinyGizmo: Custom Components for Shiny Applications

Create simple accordion

Description

Created component provides basic accordion functionality - enroll/collapse behavior with only necessary styling (enrolled state icon). In order to provide custom styling for accordion items configure its header and content accordingly while constructing the item (see accordionItem).

Usage

accordion(id, ..., class = "")

Arguments

id	Id of the accordion component.
...	Accordion items created with accordionItem.
class	Extra class added to accordion container.

Value

A 'shiny.tag' object defining html structure of accordion container.

Examples

# Basic construction with simple header and content
if (interactive()) {
  library(shiny)
  ui <- fluidPage(
    actionButton("new", "New"),
    accordion(
      "acc",
      accordionItem("first", "Hello", "There", active = TRUE),
      accordionItem("second", "General", "Kenobi")
    )
  )

  server <- function(input, output, session) {
    observeEvent(input$new, {
      addAccordionItem("acc", accordionItem(sample(letters, 1), "New", "Accordion", active = TRUE))
    })
  }

  shinyApp(ui, server)
}

shinyGizmo documentation built on March 7, 2023, 7:31 p.m.