2012-06-21 14 views
5

Ich habe eine asymmetrische Liste, d. H. Die Anzahl der Elemente in jeder Unterliste ist unterschiedlich. Wie kann ich die Liste in eine Matrix umwandeln?R: asymmetrische Liste in Matrix umwandeln - Anzahl der Elemente in jeder Unterliste unterscheidet sich

Im Folgenden beginne ich mit einer symmetrischen Liste und wandle es auf zwei verschiedene Arten in eine Matrix um.

# create a symmetric list 

my.list1 <- list(c(1,2,3,4),c(5,6,7,8),c(9,10,11,12)) 
my.list1 

# convert symmetric list to a matrix 

mat.a1 <- matrix(unlist(my.list1), nrow=length(my.list1), byrow=T) 
mat.a1 

# alternative method to convert symmetric list to a matrix 

mat.b1 <- do.call(rbind, my.list1) 
mat.b1 

Als nächstes erstelle ich eine asymmetrische Liste:

# create an asymmetric list 

my.list2 <- list(c(1,2,3,4),c(5,6,7,8,9),c(10,11,12,13)) 
my.list2 

Hier ist die gewünschte Matrix:

# desired result 

#  [,1] [,2] [,3] [,4] [,5] 
# [1,] 1 2 3 4 NA 
# [2,] 5 6 7 8 9 
# [3,] 10 11 12 13 NA 

Antwort

7

Erstens erweitern jeden Vektor in der Liste mit NAs Vektoren derselben zu erhalten Länge. Dann erstellen Sie Ihre Matrix. Zum Beispiel:

max.len <- max(sapply(my.list2, length)) 
corrected.list <- lapply(my.list2, function(x) {c(x, rep(NA, max.len - length(x)))}) 
mat <- do.call(rbind, corrected.list) 
Verwandte Themen