install.packages("tm") # only need to do once
library(tm)
library(pdftools)

files <- list.files(pattern = "pdf$")

Rpdf <- readPDF(control = list(text = "-layout"))