当我使用textreadr阅读pdf时,出现错误“ PDF错误:无效的字体粗细”。很少有pdf文件存在问题;我不确定哪个。因此,我希望能够阅读所有的pdf。我不确定如何给您提供pdf进行实验,但是您可以使用purrr中的“可能”帮助我更新以下代码吗?
library(textreadr); library(tidyverse)
pdfpath <- setwd("C:/Users/...")
filename <- list.files(pdfpath, pattern = "*.pdf")
pdf <- map_dfr(filename, ~(read_pdf(.x) %>% mutate(docname=.x)))