# \donttest{
##
library(survival)
library(dplyr)
fit2<-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')
print(fit2)
##
# }
Run the code above in your browser using DataLab