subcontents_links: Subcontents links function This function is used internally...

View source: R/contents_links.R

subcontents_linksR Documentation

Description

Subcontents links function This function is used internally within contents_link to create links to headings within pages.

Usage

subcontents_links(subcontents_text_list, subcontents_id_list)

Arguments

subcontents_text_list

vector of link text for subcontents

subcontents_id_list

vector of link ids for subcontents. pass NAs for automatic matching to id in shinygovstyle::heading_text

Value

a ol html shiny object

Examples

if (interactive()) {
  ui <- shiny::fluidPage(
    shinyGovstyle::header(
      main_text = "Example",
      secondary_text = "User Examples",
      logo = "shinyGovstyle/images/moj_logo.png"
    ),
    shiny::column(
      width = 3,
      id = "nav",
      shiny::tags$div(
        shiny::tags$h2("Contents"),
        subcontents_links(
          c("radio_button_Input (inline)", "button_Input"),
          c(NA, NA)
        ),
        subcontents_links(
          c("date_Input", "button_Input"),
          c(NA, "button_input_text_types")
        )
      )
    )
  )

  server <- function(input, output, session) {
  }
  shiny::shinyApp(ui = ui, server = server)
}

shinyGovstyle documentation built on Sept. 12, 2024, 5:07 p.m.