如何将不等长数值向量列表转为带ID列的DataFrame？

你遇到的Tibble columns must have compatible sizes.错误，是因为bind_rows()要求列表中的每个元素都是数据框（或tibble），而你的列表元素是不等长数值向量，无法直接按行合并成结构一致的列。

下面是几种可行的解决方案：

方法一：Base R stack()函数（最简便） #

stack()是R内置函数，专门用于将命名列表转换为两列的数据框，默认第一列是向量值，第二列是列表元素的名称：

mylist <- list(a = c(1,2,3), b = c(2,3))

# 转换并重命名列
result <- stack(mylist)
colnames(result) <- c("sd", "id")
result

输出结果：

sd id
1  1  a
2  2  a
3  3  a
4  2  b
5  3  b

方法二：Tidyverse工具链 #

如果你习惯用tidyverse包，可以用以下两种方式：

方式1：purrr::map_dfr()遍历转换 #

遍历列表中的每个向量，将其转为单列tibble，再按行合并并添加ID列：

library(purrr)
library(dplyr)

map_dfr(mylist, ~ tibble(sd = .x), .id = "id")

方式2：tidyr::unnest_longer()展开列表列 #

先构建包含ID和列表列的tibble，再将列表列展开为长格式：

library(dplyr)
library(tidyr)

tibble(id = names(mylist), sd = mylist) %>%
  unnest_longer(sd)

两种tidyverse方法的输出结果和需求完全一致。

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