r - 将不同长度的列表转换为数据框

Question

我正在尝试将不同长度的简单列表转换为数据框，如下所示。我想用 NaN 填充缺失值。我尝试使用 ldply、rbind、as.data.frame()，但未能将其转换为我想要的格式。请帮忙。

x=c(1,2)
y=c(1,2,3)
z=c(1,2,3,4)
a=list(x,y,z)

a
[[1]]
[1] 1 2

[[2]]
[1] 1 2 3

[[3]]
[1] 1 2 3 4

输出应该是：

x   y   z
1   1   1
2   2   2
NaN 3   3
NaN NaN 4

Answer 1

使用rbind.fill.matrixfrom "plyr" 可以让您非常接近您正在寻找的内容：

> library(plyr)
> t(rbind.fill.matrix(lapply(a, t)))
  [,1] [,2] [,3]
1    1    1    1
2    2    2    2
3   NA    3    3
4   NA   NA    4

Answer 2

这是很多代码，所以不像 Ananda 的解决方案那样干净，但都是基于 R 的：

maxl <- max(sapply(a,length))
out <- do.call(cbind, lapply(a,function(x) x[1:maxl]))
# out <- matrix(unlist(lapply(a,function(x) x[1:maxl])), nrow=maxl) #another way
out <- as.data.frame(out)
#names(out) <- names(a)

结果：

> out
  V1 V2 V3
1  1  1  1
2  2  2  2
3 NA  3  3
4 NA NA  4

注意：生成的 df 的名称将取决于您的列表 ( a) 的名称，该列表当前没有名称。