adsl <- radsl(N = 10, seed = 1, study_duration = 2)
adeg <- radeg(adsl, visit_format = "WEEK", n_assessments = 7L, seed = 2)
adeg
adeg <- radeg(adsl, visit_format = "CYCLE", n_assessments = 2L, seed = 2)
adeg
Run the code above in your browser using DataLab