R语言：为列表中的每个数据框添加“group”列

你可以使用lapply()函数来对列表中的每个对象进行操作，并使用names()函数来获取每个对象的名称。下面是一个示例代码：

# 创建一个包含多个数据框的列表
df1 <- data.frame(A = 1:3, B = 4:6)
df2 <- data.frame(A = 7:9, B = 10:12)
df3 <- data.frame(A = 13:15, B = 16:18)
my_list <- list(df1, df2, df3)

# 使用lapply()函数添加group列
my_list_with_group <- lapply(seq_along(my_list), function(i) {
  df <- my_list[[i]]
  df$group <- names(my_list)[i]
  df
})

# 查看结果
my_list_with_group

运行以上代码后，my_list_with_group将是一个包含了每个数据框对象的列表，每个对象都添加了一个名为group的列，其中的值为相应数据框对象的名称。