如何制作一個受阻矩陣？

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)

應該管用