（R）将来自多个txt文件的文本合并为一个连续的文本单元

Question

我有257个.txt文件，每个文件都有一堆Q + A成绩单。我想将每个文本提取到R中的单个向量中。大多数相关问题涉及将多个文件读入数据框或表中，我不想其中的任何一个，而只是一大块文本。

我确实成功获取了所有文件：

QA_all <- choose.files()

但除此之外，我很困惑。这里提到的解决方案：Import multiple text files in R and assign them names from a predetermined list

似乎可以近似我想要的东西，但这只是某种列表。我能够将列表中的文本项提取到向量中，然后将其展平并删除行：

#extract text from files and put in a vector
data_list = lapply(QA_all, function(file) scan(file, what = "character"))

text <- c(data_list[1:257])
flat.list <- unlist(text, recursive = TRUE, use.names = TRUE)

#remove lines
QA.vector <- paste(flat.list, collapse=" ")

但是我想知道是否可以直接使用lapply（）创建列表而无需这样做。我想知道是否存在从多个文件中提取文本并将其放入R中连续文本单元的更直接方法。