Machen Sie eine Matrix von Submatrix in R

Question

Ich muss eine Matrix in R mit seinen Elementen sind aus Matrizen ich zuvor definiert. Zum Beispiel habe ich habe 4 Matrizen,

w <- matrix(c(1,2,3,4),2,2) 
x <- matrix(c(5,6,7,8),2,2) 
y <- matrix(c(9,10,11,12),2,2) 
z <- matrix(c(13,14,15,16),2,2) 

Dann sollte die neue Matrix eine 4X4 Matrix mit w ist ein [1:2,1:2] Element, x ist ein [1:2,3:4] Element, y ist ein [3:4,1:2] Element und z ist ein [3:4,3:4] Element.

Wie kann ich das schnell machen?

Answer 1

Wir können eine array erstellen und dann durch die dritte Dimension und rbind es durchlaufen.

ar1 <- array(c(w, x, y,z), dim=c(2, 4,2)) 
do.call(rbind,lapply(seq(dim(ar1)[3]), function(i) ar1[,,i])) 
#  [,1] [,2] [,3] [,4] 
#[1,] 1 3 5 7 
#[2,] 2 4 6 8 
#[3,] 9 11 13 15 
#[4,] 10 12 14 16 

Oder, wie in den Kommentaren @thelatemail erwähnt

apply(array(c(w,x,y,z), dim=c(2,4,2)), 2, I) 

wo I steht für inhibit interpretation oder identity anstelle von I