Create Block Diagonal Matrix from Passed Matricies

Copied from similarly named function in dlm package

bdiag(...)

Arguments

...	matricies to create block diagonal matrix from

Value

matrix

Examples

x <- matrix(runif(10), 5, 2)
y <- matrix(runif(6), 3, 2)
bdiag(x,y)
#>           [,1]       [,2]      [,3]      [,4]
#> [1,] 0.5168041 0.43052065 0.0000000 0.0000000
#> [2,] 0.6766108 0.14540735 0.0000000 0.0000000
#> [3,] 0.8809331 0.45112033 0.0000000 0.0000000
#> [4,] 0.7312292 0.57878149 0.0000000 0.0000000
#> [5,] 0.3986198 0.07041712 0.0000000 0.0000000
#> [6,] 0.0000000 0.00000000 0.7423262 0.1366286
#> [7,] 0.0000000 0.00000000 0.5492207 0.9302335
#> [8,] 0.0000000 0.00000000 0.6345443 0.6511186