在 R [重复] 中读取、子集和绑定许多 .txt 文件

Question

我想阅读许多 .txt 文件，忽略第一行，只获取第五列。之后，将提取的所有这些列合并到一个 data.frame 中。

我使用 for 循环创建了这些，使用 assign() 构建了许多变量，然后使用 mget(ls()) 获取所有变量。

有没有更快的方法来做到这一点？

以下是其中三个文件：we.tl/t-JcVsfiUPLv

Answer 1

assign 通常应该避免使用，在这种情况下，我们不需要在全局环境中创建这些对象。尝试使用lapply。

#List all text files in the working directory
filenames <- list.files(pattern = '\\.txt$')
#Read every text file with header, skipping the 1st row. 
#Keep only the 5th column after reading the data. 
result <- lapply(filenames, function(x) read.table(x,skip = 1,header = TRUE)[,5])
result