powered by
blockdiag(x, ..., pad = 0)
A <- diag(3)+1 blockdiag(A,A,A,pad=NA)
Run the code above in your browser using DataLab