R语言使用循环构建平级分组列表出现嵌套问题如何修正？

你原有代码中list_container <- list(list_container, templist)的写法，每次都会把已经生成的旧列表和新提取的分组值作为两个元素，重新封装成一个新的两层列表，每迭代一次嵌套层数就+1，最终得到多层嵌套的结构，不符合平级要求。

方案1：修改循环逻辑 #

直接给列表的指定索引位置赋值，避免额外嵌套：

list_container <- list()
groups <- unique(df$var1)
for (i in seq_along(groups)) {
  templist <- df[df$var1 == groups[i], "var2"] 
  list_container[[i]] <- templist
}

你也可以用列表拼接的方式实现，效果一致：

list_container <- list()
for (i in unique(df$var1)) {
  templist <- df[df$var1 == i, "var2"]
  list_container <- c(list_container, list(templist))
}

方案2：使用内置函数（无需手动写循环） #

R原生的split函数专门用于按分组拆分向量/数据框，一行代码即可实现目标效果：

list_result <- unname(split(df$var2, df$var1))

其中unname用于去除列表默认携带的分组名称，最终输出和你预期的结构完全一致。

内容的提问来源于stack exchange，提问作者Shaun