# \donttest{
data(example_dat)
surv_dat <- example_dat$surv_dat
res_SMAHP <- SMAHP(example_dat$X, example_dat$M, example_dat$C, time = surv_dat$time,
status = surv_dat$status)
get_adjusted_p(res_SMAHP)
# }
Run the code above in your browser using DataLab