This function help users to easily make a symmetric matrix using a lower or an upper triangular matrix.
make_sym(.matrix, make = "upper", diag = NA)
.matrix | The upper or lower triangular matrix. |
---|---|
make | The triangular to built. Default is |
diag | What show in the diagonal of the matrix. Default to |
A symmetric matrix.
#> [,1] [,2] [,3] [,4] #> [1,] NA NA NA NA #> [2,] 20 NA NA NA #> [3,] 20 20 NA NA #> [4,] 20 20 20 NAmake_sym(lower_tri)#> [,1] [,2] [,3] [,4] #> [1,] NA 20 20 20 #> [2,] 20 NA 20 20 #> [3,] 20 20 NA 20 #> [4,] 20 20 20 NA#> [,1] [,2] [,3] [,4] #> [1,] NA 20 20 20 #> [2,] NA NA 20 20 #> [3,] NA NA NA 20 #> [4,] NA NA NA NAmake_sym(upper_tri, make = "lower", diag = 1)#> [,1] [,2] [,3] [,4] #> [1,] 1 20 20 20 #> [2,] 20 1 20 20 #> [3,] 20 20 1 20 #> [4,] 20 20 20 1# }