set.seed(123)
the_data <- simulate_tvem_example(n_subjects=200)
tvem_model <- tvem(data=the_data,
formula=y~1,
id=subject_id,
time=time)
print(tvem_model)
plot(tvem_model)
Run the code above in your browser using DataLab