system('convert koga_original.jpg -quality 50 -resize 2048 low_quality_3.jpg')Reducing image file size with ImageMagick
R
Mishmash
Links
Initial analysis
Currently best version
Even a lot smaller
system('convert koga_original.jpg -quality 50 -resize 1024 low_quality_4.jpg')
system('convert koga_original.jpg -quality 50 -resize 512 low_quality_5.jpg')
File sizes
library('fs')
library('knitr')
tibble(filenames = dir_ls(),
filesizes = file_size(filenames)) |>
kable(align = 'c')| filenames | filesizes |
|---|---|
| 2023-08-03-reducing-image-file-size-with-imagemagick.qmd | 2.09K |
| 2023-08-03-reducing-image-file-size-with-imagemagick.rmarkdown | 2.1K |
| 2023-08-03-reducing-image-file-size-with-imagemagick_files | 96 |
| koga_edited.jpg | 193.93K |
| koga_original.jpg | 2.5M |
| koga_signal.jpeg | 505.13K |
| low_quality_1.jpg | 206.18K |
| low_quality_2.jpg | 516.7K |
| low_quality_3.jpg | 387.38K |
| low_quality_4.jpg | 206.18K |
| low_quality_5.jpg | 146.79K |