从树列表到R中的矩阵

时间:2015-11-13 22:15:26

标签: r list matrix vector tree

道歉,如果这个问题太基础了。什么是有效的方法/想法(在 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值,然后转换为矩阵。

当然,(方形)矩阵的大小可以改变。)

提前感谢您的时间。

1 个答案:

答案 0 :(得分:4)

您可以使用

## 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