## ----include = FALSE----------------------------------------------------------
knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>",
  message = FALSE,
  warning = FALSE,
  eval = TRUE,
  echo = FALSE
)

table_note <- paste(
  "Note: the cells in the ‘Example of colour’ column may appear blank",
  "to screen reader software. They contain a colour fill, but no data."
)

## -----------------------------------------------------------------------------
sgplot:::colour_table(sgplot::sg_colour_palettes$main)

## -----------------------------------------------------------------------------
sgplot:::colour_table(sgplot::sg_colour_palettes$`main-extended`)

## -----------------------------------------------------------------------------
sgplot:::colour_table(sgplot::sg_colour_palettes$sequential)

## -----------------------------------------------------------------------------
sgplot:::colour_table(sgplot::sg_colour_palettes$focus)

## -----------------------------------------------------------------------------
sgplot:::colour_table(sgplot::sss_colour_palettes$main)

## -----------------------------------------------------------------------------
sgplot:::colour_table(sgplot::sss_colour_palettes$`main-extended`)

## -----------------------------------------------------------------------------
sgplot:::colour_table(sgplot::sss_colour_palettes$sequential)

## -----------------------------------------------------------------------------
sgplot:::colour_table(sgplot::sss_colour_palettes$focus)

## -----------------------------------------------------------------------------
sgplot:::colour_table(sgplot::af_colour_palettes$main)

## -----------------------------------------------------------------------------
sgplot:::colour_table(sgplot::af_colour_palettes$main2)

## -----------------------------------------------------------------------------
sgplot:::colour_table(sgplot::af_colour_palettes$main6)

## -----------------------------------------------------------------------------
sgplot:::colour_table(sgplot::af_colour_palettes$sequential)

## -----------------------------------------------------------------------------
sgplot:::colour_table(sgplot::af_colour_palettes$focus)

## ----view-colours, eval = FALSE, echo = TRUE----------------------------------
# # View names and hex codes for all colours
# sgplot::sg_colour_values
# 
# # View names and hex codes for all colour palettes
# sgplot::sg_colour_palettes
# 
# # View names and hex codes for `main` colour palette
# sgplot::sg_colour_palettes$main
# 
# # For Social Security Scotland palettes, use the sss_ prefix
# sgplot::sss_colour_palettes
# 
# # For Analysis Function palettes, use the af_ prefix
# sgplot::af_colour_palettes