matrix2bdiag | R Documentation |
It converts a matrix into a block diagonal matrix.
matrix2bdiag(x, ...)
x |
A |
... |
Further arguments to be passed to |
Each row of x
is converted into a symmetric matrix via
vec2symMat
. Then the list of the symmetric matrices is
converted into a block diagonal matrix via a function written by Scott
Chasalow posted at http://www.math.yorku.ca/Who/Faculty/Monette/pub/stmp/0827.html.
Mike W.-L. Cheung <mikewlcheung@nus.edu.sg>
vec2symMat
(m1 <- matrix(1:12, ncol=6, byrow=TRUE))
# [,1] [,2] [,3] [,4] [,5] [,6]
# [1,] 1 2 3 4 5 6
# [2,] 7 8 9 10 11 12
matrix2bdiag(m1)
# [,1] [,2] [,3] [,4] [,5] [,6]
# [1,] 1 2 3 0 0 0
# [2,] 2 4 5 0 0 0
# [3,] 3 5 6 0 0 0
# [4,] 0 0 0 7 8 9
# [5,] 0 0 0 8 10 11
# [6,] 0 0 0 9 11 12
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.