# 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)
as.matrix(omat(mod))
Run the code above in your browser using DataLab