library(pdftools) pdf_subset("D:/R Document/xinghua3.pdf", pages = 79:85, output = "D:/R Document/xinghua3_1.pdf")