如何制作阻塞矩阵？

Question

假设我有以下矩阵

         1   2   3
         4   5   6
         7   8   9

我想制作一个像这样的块矩阵：

         1   2   3   0   0    0   0   0   0   0    0   0  
         4   5   6   0   0    0   0   0   0   0    0   0
         7   8   9   0   0    0   0   0   0   0    0   0
         0   0   0   1   2    3   0   0   0   0    0   0 
         0   0   0   4   5    6   0   0   0   0    0   0
         0.  0   0   7   8    9   0   0   0   0    0   0   
         0   0   0   0    0   0   1   2   3   0    0   0    
         0   0   0   0    0   0   4   5   6   0    0   0   
         0   0   0   0    0   0   7   8   9   0    0   0   
         0   0    0   0   0   0   0   0   0   1    2   3   
         0   0    0   0   0   0   0   0   0   4    5   6   
         0   0    0   0   0   0   0.  0   0   7    8   9     

我做了以下：

   BigKernel<-Matrix::bdiag(replicate(4, m1, simplify = FALSE))

但问题是 BigKernel 不是矩阵。当我这样做时

 as.matrix(Bigkernel)

这是错误的。并且类型（Bigkernel）是 S4。

如何制作矩阵？

Answer 1

R 区分大小写。 BigKernel 和 Bigkernel 不同

as.matrix(BigKernel)

应该工作