fit1 <- fit(model1,
SID='ID',
data=telomerase,
iter=2000,
warmup=1000,
thin=1,
seed=3)
fit2 <- fit(model2,
SID='StudyID',
data=ascus,
iter=2000,
warmup=1000,
thin=1,
seed=3)Run the code above in your browser using DataLab