# Create a distribution plot of Cmax
xpdb_ex_pk %>%
group_by(ID, SEX, .problem = 1) %>%
summarize(CMAX = max(DV), .problem = 1) %>%
ungroup(.problem = 1) %>%
xplot_distrib(aes(x = CMAX, density_fill = SEX), type = 'dr')
Run the code above in your browser using DataLab