Create symmetric matrix

Create symmetric matrix

Usage

symm(m, data)

Arguments

m

Square numeric matrix.

data

Numeric values of the upper triangular side of the matrix

Value

A square symmetric matrix.

Note

After the upper case there can be other values that are assumed to be in the diagonal.

See also

subSymm(), correct()

Examples

m <- matrix(0, ncol = 5, nrow = 5)
symm(m, c(0, 1, 1, 1, 0, 0.5, 0.2, 0.3, 0.7, 0.1))
#>      [,1] [,2] [,3] [,4] [,5]
#> [1,]  0.0  0.0  1.0  1.0  0.2
#> [2,]  0.0  0.0  1.0  0.0  0.3
#> [3,]  1.0  1.0  0.0  0.5  0.7
#> [4,]  1.0  0.0  0.5  0.0  0.1
#> [5,]  0.2  0.3  0.7  0.1  0.0