在R中将多页pdf的每一页转换为单独的png文件

我见过一个尝试将pdf转换为png的例子，但没有一个答案显示如何将多页pdf的每一页保存为不同的png文件

从一个13页的pdf示例开始：

# exmaple pdf 
example_pdf <- "https://arxiv.org/ftp/arxiv/papers/1312/1312.2789.pdf"

#exmaple pdf
示例\u pdf我们可以使用
magick包中的
image\u read\u pdf
功能创建每个页面的png：

#install magick package
install.packages("magick")
library("magick")

# creating magick-image class with a png for each page of the pdf
pages <- magick::image_read_pdf(example_pdf)
pages


# saving each page of the pdf as a png
j <- 1:13
for (i in j){
pages[i] %>% image_write(., path = paste0("image",i,".png"), format = "png")

}  

#安装magick软件包
安装程序包（“magick”）
图书馆（“魔法”）
#为pdf的每个页面创建带有png的magick图像类
页