从R中有两列的PDF中很好地提取文本

我正试图摘录这些公司的年度报告。它的设计是在两列的大部分。所以我不知道如何正确地提取它，因为在使用pdftools包的ri中，我提取了第二列第一行旁边第一列的第一行，而不是第一列的第二行

这是我的代码：

library(pdftools)
readpdf<- pdf_text("https://www.telefonica.com/documents/153952/13347920/2019-Telefonica-Consolidated-Management-Report.pdf/0a9c8382-c9ff-ba52-1d5b-e431a7efab3f")

库（pdftools）
readpdf