cisurvfitJMCS | R Documentation |
FastJM
Bootstrapped CI for predicted survival probability
cisurvfitJMCS(object)
object |
a |
Bootstrap CI for the survival probability and other relevant information for predicted survival plot
##
library(survival)
library(dplyr)
jmcs1<-jmcsBig(dtlong=data.frame(long2),
dtsurv = data.frame(surv2),
longm=y~ x7+visit,
survm=Surv(time,status)~x1+visit,
rd= ~ visit|id,
samplesize=200,id='id')
mod2<-jmcs1
P2<-survfitJMCS(model<-mod2,ids<-c(5),u<-seq(surv2[surv2$id==5,]$time,
surv2[surv2$id==5,]$time+10,0.2),obs.time='time')
bootci<-cisurvfitJMCS(P2)
print(bootci)
##
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.