如何将含不同长度列表的行拆分为更长的DataFrame？

首先构造模拟数据还原你的场景：

library(tidyverse)

# 原始DataFrame（X/Y为列表列）
df <- tibble(
  ID = c("albert", "betina"),
  X = list(c(1.1, 2.2, 3.3), c(4.4, 5.5)),
  Y = list(c(10.1, 20.2, 30.3), c(40.4, 50.5)),
  Size = c(3, 2)
)

正确展开方法 #

如果你的X/Y是列表列（每个单元格是一个独立list），直接使用unnest()指定要展开的列即可，这会将每个列表元素拆成单独一行，同时自动配对X/Y的对应元素：

expanded_df <- df %>% unnest(cols = c(X, Y))

执行后得到的结果就是你需要的格式：

排查你遇到的问题 #

1. unnest()未展开反而转成向量：
   这说明你的X/Y可能不是列表列，而是存储为字符串格式的向量表达式（比如单元格内容是"c(xx.x1, xx.x2...)"）。这种情况需要先将字符串解析为列表，再展开：

   # 假设X/Y是字符串格式
   df_fixed <- df %>%
     mutate(
       X = map(X, ~ eval(parse(text = .x))),
       Y = map(Y, ~ eval(parse(text = .x)))
     ) %>%
     unnest(cols = c(X, Y))
   

2. unnest_longer()生成多余列：
   unnest_longer()默认会为每个列表元素添加索引列，如果你不需要，可以通过indices_include = FALSE参数关闭，但更适合你场景的是直接用unnest()——它专门用于将多元素列表列展开为多行，且自动配对同长度的列元素。

3. 向量长度不兼容报错：
   当你尝试对非列表列执行unnest()时会出现这个错误，确保先将X/Y转换为列表列，且每个ID对应的X/Y列表长度一致（和Size列的值匹配）。

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