Como puedo construir una matriz de bloque a partir de una lista? Tengo por ejemplo una lista con 3 matrices de distintos tamaños A,B y C
> A
[,1] [,2] [,3]
[1,] 1 1 1
[2,] 1 1 1
[3,] 1 1 1
> B
[,1]
[1,] 2
[2,] 2
[3,] 2
> C
[,1] [,2]
[1,] 3 3
[2,] 3 3
[3,] 3 3
Una forma de hacerlo es
c1=rbind(A,0*A, 0*A)
c2=rbind(0*B,B,0*B)
c3=rbind(0*C,0*C,C)
MB=cbind(c1,c2,c3)
lo que da una matriz de la siguiente forma:
[,1] [,2] [,3] [,4] [,5] [,6]
[1,] 1 1 1 0 0 0
[2,] 1 1 1 0 0 0
[3,] 1 1 1 0 0 0
[4,] 0 0 0 2 0 0
[5,] 0 0 0 2 0 0
[6,] 0 0 0 2 0 0
[7,] 0 0 0 0 3 3
[8,] 0 0 0 0 3 3
[9,] 0 0 0 0 3 3
como podria construir la MB (Matriz de bloque) a partir de la lista de matrices sin tener que hacer tanta escritura? El principal problema es que la lista puede ser muy larga, una idea es que podria crear una Matriz de ceros del mismo tamaño pero no he encontrado la forma de ir sustituyendo los elementos donde corresponde