r - 如何使输出文件名与 R 中的输入文件名完全相同。R 中 pdfconverter 中的文件名格式应该是什么

Question

我尝试使用 pdftools-library 中的“pdf_convert”函数将 pdf 的第一页输出为 png。我得到了 png，但输出文件名具有“图像（页码）.png”。如何获得与输入文件名完全相同的输出文件 Pdf 名称：- beer&cider_2bay_x_4shelf_londis_cluster1.pdf Png 名称：- beer&cider_2bay_x_4shelf_londis_cluster1_1.png

Answer 1

“pdftools”包信息可在https://docs.ropensci.org/pdftools和 https://github.com/ropensci/pdftools#readme获得。

library(pdftools)
pdf_convert("Some/file/path/filename.pdf",
            format = "png",
            pages = 1, # use page number
            filenames = "filename" # Set output file name
            )

这将在您的工作目录中生成文件。
使用完整文件路径将 [png] 保存到特定文件夹或here::here()

r pdftools 文件名

Answer 2

根据您的需要调整此代码，以将所需的所有图像从 pdf 提取到png与原始 pdf 文件同名的特定文件夹中：

library(pdftools)
library(glue)
library(tidyverse)

pdf_file <- "your_pdf.pdf"
output_folder <- "./output"

pdf_info <- pdf_info(pdf_file) # to get number of pages
file_name <- str_remove(string = basename(pdf_file), pattern = '\\.pdf' # basename of the file without extension
folder_name <- glue("{output_folder}/{file_name}")
full_names <- glue("{folder_name}_{1:pdf_info$pages}.png")
pdf_convert(pdf = pdf_file, format = "png", pages = 1:pdf_info$pages, filenames = full_names)