S <- matrix(c(2, 1, 1, 3), 2)
x <- sigma2vec(list(sigma = S))
x
vec2sigma(x)
vec2sigma(x, groups = "sigma", visits = c("v1", "v2"), simplify = TRUE)
## Two groups
vec2sigma(c(1, 0.5, 2, 3, 1, 4), groups = c("A", "B"))
Run the code above in your browser using DataLab