## ----include = FALSE----------------------------------------------------------
knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>"
)
library(shinyGovstyle)

## ----eval = FALSE-------------------------------------------------------------
# install.packages("shinyGovstyle")

## ----eval = FALSE-------------------------------------------------------------
# pak::pak("dfe-analytical-services/shinyGovstyle")

## ----eval = FALSE-------------------------------------------------------------
# ui <- gov_page(
#   shinyjs::useShinyjs(),
#   # rest of your UI
# )

## ----eval = FALSE-------------------------------------------------------------
# library(shiny)
# library(shinyGovstyle)
# 
# ui <- gov_page(
#   title = "My dashboard",
#   description = "A dashboard showing my department's latest statistics",
#   skip_to_main(),
#   header(
#     org_name = "My department",
#     service_name = "My dashboard"
#   ),
#   phase_banner(
#     inputId = "phase",
#     type = "Beta",
#     label = "This is a new service."
#   ),
#   gov_main_layout(
#     heading_text("Welcome", size = "l", level = 1),
#     gov_text("Select a report from the navigation above.")
#   ),
#   footer()
# )
# 
# server <- function(input, output, session) {}
# 
# shiny::shinyApp(ui, server)