symm_mat {IRCcheck}

Symmetric Matrix Copy the upper triangular of a matrix into the lower triangular portion of the matrix.

Description

Symmetric Matrix

Copy the upper triangular of a matrix into the lower triangular portion of the matrix.

Usage

symm_mat(x)

Arguments

x

A matrix of dimensions p by p.

Value

A matrix

Examples

adj <- matrix(sample(0:1, size = 25, replace = TRUE), 5, 5)
symm_mat(adj)