omega {mrgsolve}

Manipulate OMEGA matrices

Description

The primary function is omat that can be used to both get the $OMEGA matrices out of a model object and to update $OMEGA matrices in a model object.

Usage

omat(.x, ...)

## S4 method for signature 'missing'
omat(.x, ...)

## S4 method for signature 'matrix'
omat(.x, ..., labels = list())

## S4 method for signature 'NULL'
omat(.x, ...)

## S4 method for signature 'list'
omat(.x, ...)

## S4 method for signature 'omegalist'
omat(.x, ...)

## S4 method for signature 'mrgmod'
omat(.x, ..., make = FALSE, open = FALSE)

## S4 method for signature 'mrgsims'
omat(.x, make = FALSE, ...)

Arguments

.x

a matrix, list of matrices or matlist object

...

passed to other functions, including modMATRIX

labels

character vector of names for $OMEGA elements; must be equal to number of rows/columns in the matrix

make

logical; if TRUE, matrix list is rendered into a single matrix

open

passed to merge.list

x

matlist object

Examples

## example("omega")
mat1 <- matrix(1)
mat2 <- diag(c(1,2,3))
mat3 <- matrix(c(0.1, 0.002, 0.002, 0.5), 2,2)
mat4 <- dmat(0.1, 0.2, 0.3, 0.4)

omat(mat1)
omat(mat1, mat2, mat3)
omat(A=mat1, B=mat2, C=mat3)

mod <- mrgsolve::house() %>% omat(mat4)

omat(mod)
omat(mod, make=TRUE)


## Not run: 

$OMEGA
1 2 3

$OMEGA \@block
1 0.1 2

$OMEGA \@cor
\@ prefix ETA_
\@ labels CL VC KA
0.1
0.67 0.2
0 0 0.3


## End(Not run)