当我使用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)))