1
2
3
4
5
6
7
8
9
|
#> convert PDF to PNG
library(magick)
path <- "C:/Users/flavjack/git/lozanoisla/content/lectures/2022-11-24-UNALM/"
banner <- file.path(path, "Semana Académica.pdf") %>%
image_read_pdf(pages = 2) %>%
image_write(file.path(path, "banner.png"))
|