xtable | R Documentation |
produces a LaTeX table with the results of a joint model using package xtable.
## S3 method for class 'jointModel' xtable(x, caption = NULL, label = NULL, align = NULL, digits = NULL, display = NULL, which = c("all", "Longitudinal", "Event"), varNames.Long = NULL, varNames.Event = NULL, p.values = TRUE, digits.pval = 4, ...)
x |
an object inheriting from class |
caption |
the |
label |
the |
align |
the |
digits |
the |
display |
the |
which |
a character string indicating which results to include in the LaTeX table. Options are all results, the results of longitudinal submodel or the results of the survival submodel. |
varNames.Long |
a character vector of the variable names for the longitudinal submodel. |
varNames.Event |
a character vector of the variable names for the survival submodel. |
p.values |
logical; should p-values be included in the table. |
digits.pval |
a numeric scalare denoting the number of significance digits in the p-value. |
... |
additional arguments; currently none is used. |
A LaTeX code chunk with the results of the joint modeling analysis.
Dimitris Rizopoulos d.rizopoulos@erasmusmc.nl
jointModel
## Not run: require(xtable) prothro$t0 <- as.numeric(prothro$time == 0) lmeFit <- lme(pro ~ treat * (time + t0), random = ~ time | id, data = prothro) survFit <- coxph(Surv(Time, death) ~ treat, data = prothros, x = TRUE) jointFit <- jointModel(lmeFit, survFit, timeVar = "time", method = "weibull-PH-aGH") xtable(jointFit, math.style.negative = TRUE) ## End(Not run)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.