Batch_PDF_file_merge

#library required

#install.packages("pdftools")
library(pdftools)

## Warning: package 'pdftools' was built under R version 4.3.2

## Using poppler version 23.08.0

# path to your target folder where your pdf files are located
folder_path <- "E:/R_code/split"

# Get a list of files in the folder
files_in_folder <- list.files(folder_path)
files_in_folder

## [1] "split_000000000001.pdf" "split_000000000002.pdf" "split_000000000003.pdf"
## [4] "split_000000000004.pdf"

# the path and the name of your combined pdf file.  You need to make a combined folder first 
output_pdf <- "E:/R_code/combined/combined.pdf"
file<-c()

for(i in 1:length(files_in_folder)){
  file1 <- paste(folder_path,"/",files_in_folder[i],sep='')
  file<-c(file,file1)
  }

pdf_combine(file, output_pdf)

## [1] "E:\\R_code\\combined\\combined.pdf"

list.files('E:/R_code/combined')

## [1] "combined.pdf"