从树列表到 R 中的矩阵

Question

抱歉，如果问题太基础了。什么是有效的 approach/idea（在 R 中）转换

list(c(1), c(1,2), c(1,2,3), c(1,2,3,4))

转为方阵形式

     [,1] [,2] [,3] [,4]
[1,]    1   NA   NA   NA
[2,]    1    2   NA   NA
[3,]    1    2    3   NA
[4,]    1    2    3    4

我想有一些快速动态的方法可以附加正确数量的 NA 值，然后转换为矩阵。

当然，（方）矩阵的大小可以改变。

提前感谢您的宝贵时间。

Answer 1

您可以使用

## create the list
x <- Map(":", 1, 1:4)

ml <- max(lengths(x))
do.call(rbind, lapply(x, "length<-", ml))
#      [,1] [,2] [,3] [,4]
# [1,]    1   NA   NA   NA
# [2,]    1    2   NA   NA
# [3,]    1    2    3   NA
# [4,]    1    2    3    4

或者你也可以

library(data.table)
as.matrix(unname(rbindlist(lapply(x, as.data.frame.list), fill = TRUE)))
#      [,1] [,2] [,3] [,4]
# [1,]    1   NA   NA   NA
# [2,]    1    2   NA   NA
# [3,]    1    2    3   NA
# [4,]    1    2    3    4

还有一个很好的衡量标准......前！

m <- stringi::stri_list2matrix(x, byrow = TRUE)
mode(m) <- "numeric"
m
#      [,1] [,2] [,3] [,4]
# [1,]    1   NA   NA   NA
# [2,]    1    2   NA   NA
# [3,]    1    2    3   NA
# [4,]    1    2    3    4

从树列表到 R 中的矩阵

From tree list to a matrix in R

tree

r

list

vector

matrix