check.one {marima}

check.one

Description

Function to check and insert leading unity matrix if NOT present.

Usage

check.one(polyn = NULL)

Arguments

polyn

(k, k, ...) matrix polynomium with or without leading unity matrix.

Value

polyn (array) with a leading unity matrix being inserted if not present.

Examples

set.seed(4711)
X <- array(rnorm(32),dim=c(4, 4, 2))
X <- check.one(X)
short.form(X)