Better naming of color palette images

README.Rmd

 library(ggplot2)
 source("R/make_functions.R")
 source("R/show_colors.R")
+fs::dir_create("docs/palettes")
 
 themes <- list(
   "Solarized" = "_solarized.scss", 
   "One Dark" = "_one-dark.scss"
 )
 
+pal_files <- c()
+
 for (theme in names(themes)) {
   theme_file <- fs::path("src", "palettes", themes[[theme]])
   colors <- read_colors(theme_file)
     theme(
       plot.title = element_text(size = rel(2), hjust = 0.5, margin = margin(t = 20, b = 10))
     )
-  print(g)
+  knitr::opts_current$set(fig.process = function(x) {
+    x2 <- sub("([.][a-z]+$)", paste0(themes[[theme]], "\\1"), x)
+    if (file.rename(x, x2)) x2 else x1
+  })
+  
+  pal_file <- fs::path("docs", "palettes", themes[[theme]])
+  fs::path_ext(pal_file) <- "png"
+  ggsave(pal_file, g, width = 10, height = 4)
+  pal_files <- c(pal_files, pal_file)
 }
+
+knitr::include_graphics(pal_files)
 ```
 
 ### Base 16 Palettes
 
 ```{r base16, fig.width=10, fig.height=4}
 base16_palettes <- fs::dir_ls(here::here("src", "palettes", "base16"), regexp = "_base16")
+
+pal_files <- c()
+
 for (base16_pal in base16_palettes) {
-  base16_info <- get_base16_theme_info(base16_pal)
+  base16_info <- base16_get_theme_info(base16_pal)
   attribution <- stringr::str_remove_all(base16_info$attribution, "(\\s*?(/?\\*/?)\\s*?)")
   attribution <- stringr::str_split(attribution, "by")[[1]]
   attribution <- stringr::str_trim(attribution)
       plot.title = element_text(size = rel(2), hjust = 0.5, margin = margin(t = 20, b = 10)),
       plot.subtitle = element_text(hjust = 0.5, margin = margin(b = 10))
     )
-  print(g)
+  
+  pal_file <- fs::path("docs", "palettes", fs::path_file(base16_pal))
+  fs::path_ext(pal_file) <- "png"
+  ggsave(pal_file, g, width = 10, height = 4)
+  pal_files <- c(pal_files, pal_file)
 }
+knitr::include_graphics(pal_files)
 ```

README.md

 <!-- badges: end -->
 
 `rstudio-scss` provides SCSS/SASS templates for full RStudio themes for
-RStudio version 1.2 (and possibly RStudio 1.2+).
+RStudio version 1.2 (and possibly RStudio
+1.2+).
 
 ## Palettes
 
-![](docs/palettes-1.png)<!-- -->![](docs/palettes-2.png)<!-- -->![](docs/palettes-3.png)<!-- -->![](docs/palettes-4.png)<!-- -->![](docs/palettes-5.png)<!-- -->
+![](docs/palettes/_solarized.png)<!-- -->![](docs/palettes/_nord.png)<!-- -->![](docs/palettes/_oceanic-plus.png)<!-- -->![](docs/palettes/_one-light.png)<!-- -->![](docs/palettes/_one-dark.png)<!-- -->
 
 ### Base 16 Palettes
 
-![](docs/base16-1.png)<!-- -->![](docs/base16-2.png)<!-- -->![](docs/base16-3.png)<!-- -->![](docs/base16-4.png)<!-- -->![](docs/base16-5.png)<!-- -->![](docs/base16-6.png)<!-- -->![](docs/base16-7.png)<!-- -->![](docs/base16-8.png)<!-- -->![](docs/base16-9.png)<!-- -->![](docs/base16-10.png)<!-- -->![](docs/base16-11.png)<!-- -->![](docs/base16-12.png)<!-- -->![](docs/base16-13.png)<!-- -->![](docs/base16-14.png)<!-- -->![](docs/base16-15.png)<!-- -->![](docs/base16-16.png)<!-- -->![](docs/base16-17.png)<!-- -->![](docs/base16-18.png)<!-- -->![](docs/base16-19.png)<!-- -->![](docs/base16-20.png)<!-- -->![](docs/base16-21.png)<!-- -->![](docs/base16-22.png)<!-- -->![](docs/base16-23.png)<!-- -->![](docs/base16-24.png)<!-- -->![](docs/base16-25.png)<!-- -->![](docs/base16-26.png)<!-- -->![](docs/base16-27.png)<!-- -->![](docs/base16-28.png)<!-- -->![](docs/base16-29.png)<!-- -->![](docs/base16-30.png)<!-- -->![](docs/base16-31.png)<!-- -->![](docs/base16-32.png)<!-- -->![](docs/base16-33.png)<!-- -->![](docs/base16-34.png)<!-- -->![](docs/base16-35.png)<!-- -->![](docs/base16-36.png)<!-- -->![](docs/base16-37.png)<!-- -->![](docs/base16-38.png)<!-- -->![](docs/base16-39.png)<!-- -->![](docs/base16-40.png)<!-- -->![](docs/base16-41.png)<!-- -->![](docs/base16-42.png)<!-- -->![](docs/base16-43.png)<!-- -->![](docs/base16-44.png)<!-- -->![](docs/base16-45.png)<!-- -->![](docs/base16-46.png)<!-- -->![](docs/base16-47.png)<!-- -->![](docs/base16-48.png)<!-- -->![](docs/base16-49.png)<!-- -->![](docs/base16-50.png)<!-- -->![](docs/base16-51.png)<!-- -->![](docs/base16-52.png)<!-- -->![](docs/base16-53.png)<!-- -->![](docs/base16-54.png)<!-- -->![](docs/base16-55.png)<!-- -->![](docs/base16-56.png)<!-- -->![](docs/base16-57.png)<!-- -->![](docs/base16-58.png)<!-- -->![](docs/base16-59.png)<!-- -->![](docs/base16-60.png)<!-- -->![](docs/base16-61.png)<!-- -->![](docs/base16-62.png)<!-- -->![](docs/base16-63.png)<!-- -->![](docs/base16-64.png)<!-- -->![](docs/base16-65.png)<!-- -->![](docs/base16-66.png)<!-- -->![](docs/base16-67.png)<!-- -->![](docs/base16-68.png)<!-- -->![](docs/base16-69.png)<!-- -->![](docs/base16-70.png)<!-- -->![](docs/base16-71.png)<!-- -->![](docs/base16-72.png)<!-- -->![](docs/base16-73.png)<!-- -->![](docs/base16-74.png)<!-- -->![](docs/base16-75.png)<!-- -->
+![](docs/palettes/_base16-3024.png)<!-- -->![](docs/palettes/_base16-apathy.png)<!-- -->![](docs/palettes/_base16-ashes.png)<!-- -->![](docs/palettes/_base16-atelier-cave.png)<!-- -->![](docs/palettes/_base16-atelier-dune.png)<!-- -->![](docs/palettes/_base16-atelier-estuary.png)<!-- -->![](docs/palettes/_base16-atelier-forest.png)<!-- -->![](docs/palettes/_base16-atelier-heath.png)<!-- -->![](docs/palettes/_base16-atelier-lakeside.png)<!-- -->![](docs/palettes/_base16-atelier-plateau.png)<!-- -->![](docs/palettes/_base16-atelier-savanna.png)<!-- -->![](docs/palettes/_base16-atelier-seaside.png)<!-- -->![](docs/palettes/_base16-atelier-sulphurpool.png)<!-- -->![](docs/palettes/_base16-bespin.png)<!-- -->![](docs/palettes/_base16-brewer.png)<!-- -->![](docs/palettes/_base16-bright.png)<!-- -->![](docs/palettes/_base16-chalk.png)<!-- -->![](docs/palettes/_base16-codeschool.png)<!-- -->![](docs/palettes/_base16-cupcake.png)<!-- -->![](docs/palettes/_base16-darktooth.png)<!-- -->![](docs/palettes/_base16-default-dark.png)<!-- -->![](docs/palettes/_base16-default-light.png)<!-- -->![](docs/palettes/_base16-dracula.png)<!-- -->![](docs/palettes/_base16-eighties.png)<!-- -->![](docs/palettes/_base16-embers.png)<!-- -->![](docs/palettes/_base16-flat.png)<!-- -->![](docs/palettes/_base16-github.png)<!-- -->![](docs/palettes/_base16-google-dark.png)<!-- -->![](docs/palettes/_base16-google-light.png)<!-- -->![](docs/palettes/_base16-grayscale-dark.png)<!-- -->![](docs/palettes/_base16-grayscale-light.png)<!-- -->![](docs/palettes/_base16-green-screen.png)<!-- -->![](docs/palettes/_base16-gruvbox-dark-hard.png)<!-- -->![](docs/palettes/_base16-gruvbox-dark-medium.png)<!-- -->![](docs/palettes/_base16-gruvbox-dark-pale.png)<!-- -->![](docs/palettes/_base16-gruvbox-dark-soft.png)<!-- -->![](docs/palettes/_base16-gruvbox-light-hard.png)<!-- -->![](docs/palettes/_base16-gruvbox-light-medium.png)<!-- -->![](docs/palettes/_base16-gruvbox-light-soft.png)<!-- -->![](docs/palettes/_base16-harmonic16-dark.png)<!-- -->![](docs/palettes/_base16-harmonic16-light.png)<!-- -->![](docs/palettes/_base16-hopscotch.png)<!-- -->![](docs/palettes/_base16-ir-black.png)<!-- -->![](docs/palettes/_base16-isotope.png)<!-- -->![](docs/palettes/_base16-london-tube.png)<!-- -->![](docs/palettes/_base16-macintosh.png)<!-- -->![](docs/palettes/_base16-marrakesh.png)<!-- -->![](docs/palettes/_base16-materia.png)<!-- -->![](docs/palettes/_base16-mexico-light.png)<!-- -->![](docs/palettes/_base16-mocha.png)<!-- -->![](docs/palettes/_base16-monokai.png)<!-- -->![](docs/palettes/_base16-nord.png)<!-- -->![](docs/palettes/_base16-ocean.png)<!-- -->![](docs/palettes/_base16-oceanicnext.png)<!-- -->![](docs/palettes/_base16-onedark.png)<!-- -->![](docs/palettes/_base16-paraiso.png)<!-- -->![](docs/palettes/_base16-phd.png)<!-- -->![](docs/palettes/_base16-pico.png)<!-- -->![](docs/palettes/_base16-pop.png)<!-- -->![](docs/palettes/_base16-railscasts.png)<!-- -->![](docs/palettes/_base16-rebecca.png)<!-- -->![](docs/palettes/_base16-seti-ui.png)<!-- -->![](docs/palettes/_base16-shapeshifter.png)<!-- -->![](docs/palettes/_base16-solar-flare.png)<!-- -->![](docs/palettes/_base16-solarized-dark.png)<!-- -->![](docs/palettes/_base16-solarized-light.png)<!-- -->![](docs/palettes/_base16-spacemacs.png)<!-- -->![](docs/palettes/_base16-summerfruit-dark.png)<!-- -->![](docs/palettes/_base16-summerfruit-light.png)<!-- -->![](docs/palettes/_base16-tomorrow-night.png)<!-- -->![](docs/palettes/_base16-tomorrow.png)<!-- -->![](docs/palettes/_base16-twilight.png)<!-- -->![](docs/palettes/_base16-unikitty-dark.png)<!-- -->![](docs/palettes/_base16-unikitty-light.png)<!-- -->![](docs/palettes/_base16-woodland.png)<!-- -->