plot_cisurvfitJMCS | R Documentation |
cisurvfitJMCS
objectprediction of survival probability and longitudinal marker using FastJM
for BIG data
plot_cisurvfitJMCS(object)
object |
fitted |
Plot for predicted survival probability
##
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')
P3<-cisurvfitJMCS(P2)
plot_cisurvfitJMCS(P3)
##
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.