r2glmm (version 0.1.1)

is.CompSym: Checks if a matrix is Compound Symmetric.

Description

Checks if a matrix is Compound Symmetric.

Usage

is.CompSym(mat, tol = 1e-05)

Arguments

mat

The matrix to be tested.

tol

a number indicating the smallest acceptable difference between off diagonal values.

Value

True if the matrix is compound symmetric.

Examples

# NOT RUN {
gcmat <- matrix(c(1,0.2,0.1,0.2,1,0.3,0.1,0.3,1), nrow = 3)
csmat <- matrix(c(1,0.2,0.2,0.2,1,0.2,0.2,0.2,1), nrow = 3)
is.CompSym(csmat)
# }