bake in png quantize

hypertidy · May 10, 2023 · f228ea6 · f228ea6
1 parent 4be59b1
commit f228ea6
Show file tree

Hide file tree

Showing 14 changed files with 17 additions and 0 deletions.
diff --git a/README.Rmd b/README.Rmd
@@ -226,6 +226,23 @@ plot(cc_location(template, type = "tasmap_tasmap25k"))  ## also 100k, 250k, 500k
 
 
 
+```{r smash,include=FALSE}
+quantize_figs <- function(dir = "man/figures") {
+  f <- fs::dir_ls(dir, regexp = "png$")
+  for (i in seq_along(f)) {
+    tf <- tempfile(fileext = ".png")
+    im <- magick::image_read(f[i])
+    magick::image_write(magick::image_quantize(im), tf)
+    
+    ## I don't know how to properly unlink the original pointer, this just a guess (not sure it matters)
+    rm(im)
+    fs::file_delete(f[i])
+    fs::file_move(tf, f[i])
+  }
+} 
+quantize_figs()
+```
+
 
 
 ---

diff --git a/man/figures/README-example01-1.png b/man/figures/README-example01-1.png
diff --git a/man/figures/README-extent1-1.png b/man/figures/README-extent1-1.png
diff --git a/man/figures/README-extent2-1.png b/man/figures/README-extent2-1.png
diff --git a/man/figures/README-nz-spData-1.png b/man/figures/README-nz-spData-1.png
diff --git a/man/figures/README-tasmap-1.png b/man/figures/README-tasmap-1.png
diff --git a/man/figures/README-tasmap-2.png b/man/figures/README-tasmap-2.png
diff --git a/man/figures/README-tasmap-3.png b/man/figures/README-tasmap-3.png
diff --git a/man/figures/README-tasmap-4.png b/man/figures/README-tasmap-4.png
diff --git a/man/figures/README-tasmap-5.png b/man/figures/README-tasmap-5.png
diff --git a/man/figures/README-tasmap-6.png b/man/figures/README-tasmap-6.png
diff --git a/man/figures/README-tasmap-7.png b/man/figures/README-tasmap-7.png
diff --git a/man/figures/README-tasmap-8.png b/man/figures/README-tasmap-8.png
diff --git a/man/figures/README-unnamed-chunk-1-1.png b/man/figures/README-unnamed-chunk-1-1.png