r - 用一系列其他矩阵填充一个矩阵

Question

我想用一系列其他矩阵填充一个矩阵，其方式与我的示例中“mat”的格式相同(其中 m1 和 m2 是用于填充 mat 的矩阵)。有谁知道是否有一个函数可以做到这一点？

m1 <- matrix (1, nrow = 2, ncol = 2)
m2 <- matrix (2, nrow = 3, ncol = 3)
mat <- matrix(c(1,1,0,0,0,1,1,0,0,0,0,0,2,2,2,0,0,2,2,2,0,0,2,2,2), nrow = 5, ncol = 5)

Answer 1

是的，Matrix 包中的 bdiag 函数。周围的 as.matrix 将其转换回基本矩阵，而不是 dgCmatrix。

library(Matrix)
as.matrix(bdiag(list(m1, m2)))

     [,1] [,2] [,3] [,4] [,5]
[1,]    1    1    0    0    0
[2,]    1    1    0    0    0
[3,]    0    0    2    2    2
[4,]    0    0    2    2    2
[5,]    0    0    2    2    2