Question

我需要从多个数据帧列表中提取第2列。我有18个文件，我可以通过分别阅读每个文件来完成。

df1 <- read.table("name.XLS", header = FALSE)
df2 <- read.table("name.XLS", header = FALSE)
df3 <- read.table("name.XLS", header = FALSE)
df4 <- read.table("name.XLS", header = FALSE)

data_list = list(df1, df2,df3,df4)
# extract column named V2
res = lapply(data_list, '[[', 2)
# convert to character
res = lapply(res, as.character)

我修改了代码以读取目录中的所有文件

folder <- "temp"  
file_list <- list.files(path=folder, pattern="*.XLS") 

for (i in 1:length(file_list)){
  assign(file_list[i], 
         read.csv(paste(folder, file_list[i], sep="/"))
  )}

我需要为data_list创建一个等效列表，该列表读取多个数据帧的列表，以从列表中的每个数据帧中提取列V2

修改

我尝试了以下代码，它运行得很好

my_data <- lapply(file_list, read.table)

您可以找到有关列表here

的更多信息

R创建多个数据帧的列表

0 个答案: