r - 使用 Pdftools 从 R 中读取完整的 PDF（20 多页）

Question

我正在尝试使用以下代码阅读 pdf (20+) 页。但是，当我执行 #-print 1 行时，它会显示 pdf 中的所有文本以及所有页面（20+）。但是，当我执行 #-print 2 时，它只显示最后一页文本。

感谢是否有人可以指导我，纠正问题并帮助阅读所有 pdf 中的所有文本。

library(httr)
library(stringi)
library(pdftools)
library(tidyverse)

text <- pdf_text("C:\\Users\\OneDrive\\VodafoneNZ_2005.pdf")

    print(text) #- print 1
       for(i in 1:length(text))
          {
              result <-   paste(text[[i]])
             
          }
        
    print(result) # print 2