Extract variance-covariance matrix of random effects from an mjoint object
Extract variance-covariance matrix of random effects from an
mjoint object.
## S3 method for class 'mjoint' getVarCov(obj, ...)
| obj | an object inheriting from class  | 
| ... | additional arguments; currently none are used. | 
A variance-covariance matrix.
Graeme L. Hickey (graemeleehickey@gmail.com)
Pinheiro JC, Bates DM. Mixed-Effects Models in S and S-PLUS. New York: Springer Verlag; 2000.
getVarCov for the generic method description.
## Not run: 
# Fit a joint model with bivariate longitudinal outcomes
data(heart.valve)
hvd <- heart.valve[!is.na(heart.valve$log.grad) & !is.na(heart.valve$log.lvmi), ]
fit2 <- mjoint(
    formLongFixed = list("grad" = log.grad ~ time + sex + hs,
                         "lvmi" = log.lvmi ~ time + sex),
    formLongRandom = list("grad" = ~ 1 | num,
                          "lvmi" = ~ time | num),
    formSurv = Surv(fuyrs, status) ~ age,
    data = list(hvd, hvd),
    inits = list("gamma" = c(0.11, 1.51, 0.80)),
    timeVar = "time",
    verbose = TRUE)
getVarCov(fit2)
## End(Not run)Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.