最近有同事找我帮忙解决一个加密 PDF 文件打印问题，这个 PDF 文件加密后只能看没法编辑，也没法打印。我的解决思路是通过 R 将这个加密 PDF 文件生成一个新的没有加密的 PDF 文件，目前 CRAN 上处理 PDF 文件的R包主要是 pdftools 包。下面给出具体 R 代码：

加载相关R包 library(pdftools) # 定义待处理文件 pdf_file = "path/to/input.pdf" # 告诉R你的文件在哪里？ # 确定文件的页数 n = pdf_length(pdf_file) # 生成新的不加密文件 pdf_subset(pdf_file, pages = 1:n, output = "path/to/output.pdf") …