# \donttest{
##
library(survival)
library(dplyr)
#################################
mod3<-jmbayesBig(dtlong=long2,
dtsurv = surv2 ,
longm=y~ x7+visit,
survm=Surv(time,status)~x1+visit,
rd= ~ visit|id,
timeVar='visit',
nchain=1,
samplesize=200,
id='id')
print(mod3)
# }
Run the code above in your browser using DataLab