inst/examples/ex-tableau_color_pal.R

In jrnold/ggthemes: Extra Themes, Scales and Geoms for 'ggplot2'

library("scales")

palettes <- ggthemes_data[["tableau"]][["color-palettes"]][["regular"]]
for (palname in names(palettes)) {
  pal <- tableau_color_pal(palname)
  max_n <- attr(pal, "max_n")
  show_col(pal(max_n))
  title(main = palname)
}