0

我曾尝试探索 pdftools。它确实有一个 pdf_combine() 函数,可以将多个 pdf 拼接为一个。但是,它无助于将 pdf 文档的多页合并为一页。

4

1 回答 1

0

如果要组合页面子集,可以使用pdftools库和pdf_split命令。首先,拆分原始 PDF 并将结果保存到您的工作目录。然后,您可以列出拆分文件的列表,list.files并在同一目录中使用新名称重新组合它们。

library(pdftools)
setwd("Z:/mypath/folder")  # put all your PDFs here; initially to include one file that is to be split
pdf_split('originalfile.pdf') # split pages into multiple files
myfiles<-list.files(pattern = "pdf")  # get a list of the split files
myfiles<-myfiles[1:4]  # select the first four pages, for example
pdf_combine(myfiles,output = "joined.pdf")  # join them
于 2021-07-14T19:09:32.297 回答