# \donttest{
require(magrittr)
vpc <- observed(obs_data, x=TIME, y=DV) %>%
simulated(sim_data, y=DV) %>%
stratify(~ GENDER) %>%
binning(NTIME) %>%
vpcstats()
# Example with 2-way stratification by GENDER and STUDY.
vpc <- vpc %>%
stratify(~ GENDER + STUDY) %>%
binning(bin = "centers", centers = c(1,3,5,7,10)) %>%
vpcstats()
# }
Run the code above in your browser using DataLab