Description Usage Arguments Details Value Examples
Table for coxph.object with model option: TRUE - allow "frailty" or "cluster" model
1 | cox2.display(cox.obj.withmodel, dec = 2)
|
cox.obj.withmodel |
coxph.object with model option: TRUE |
dec |
Decimal point, Default: 2 |
GEE like - cluster, Mixed effect model like - frailty
Table, cluster/frailty info, metrics, caption
1 2 3 4 5 | library(survival);data(lung)
fit1 <- coxph(Surv(time, status) ~ ph.ecog + age + cluster(inst), data = lung, model = TRUE)
fit2 <- coxph(Surv(time, status) ~ ph.ecog + age + frailty(inst), data = lung, model = TRUE)
cox2.display(fit1)
cox2.display(fit2)
|
Registered S3 methods overwritten by 'lme4':
method from
cooks.distance.influence.merMod car
influence.merMod car
dfbeta.influence.merMod car
dfbetas.influence.merMod car
$table
crude HR(95%CI) crude P value adj. HR(95%CI) adj. P value
ph.ecog "1.61 (1.25,2.08)" "< 0.001" "1.56 (1.22,2)" "< 0.001"
age "1.02 (1.01,1.03)" "0.007" "1.01 (1,1.02)" "0.085"
$ranef
[,1] [,2] [,3] [,4]
cluster NA NA NA NA
inst NA NA NA NA
$metric
[,1] [,2] [,3] [,4]
<NA> NA NA NA NA
No. of observations 226 NA NA NA
No. of events 163 NA NA NA
$caption
[1] "Marginal Cox model on time ('time') to event ('status') - Group inst"
$table
crude HR(95%CI) crude P value adj. HR(95%CI) adj. P value
ph.ecog "1.64 (1.31,2.05)" "< 0.001" "1.58 (1.26,1.99)" "< 0.001"
age "1.02 (1,1.04)" "0.041" "1.01 (0.99,1.03)" "0.225"
$ranef
[,1] [,2] [,3] [,4]
frailty NA NA NA NA
inst NA NA NA NA
$metric
[,1] [,2] [,3] [,4]
<NA> NA NA NA NA
No. of observations 226 NA NA NA
No. of events 163 NA NA NA
$caption
[1] "Frailty Cox model on time ('time') to event ('status') - Group inst"
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.