R语言怎么产生分块对角矩阵啊？

Question

A是一个已知的矩阵，想生成矩阵B= A 0 ... 0
0 A ... 0
0 0 ... A
这种样子的，相当于是原来diag的对角元素由数字变成了矩阵A，diag()好像不能再用了，应该怎么做呢？

Answer 1

A <- diag(x = 1, 3, 3)
library(Matrix)
B <- as.matrix(bdiag(A,A,A))本回答被提问者采纳