data(hvtn505)
dat <- load_data(time="HIVwk28preunblfu", event="HIVwk28preunbl", vacc="trt",
marker="IgG_V2", covariates=c("age","BMI","bhvrisk"),
weights="wt", ph2="casecontrol", data=hvtn505)
# \donttest{
ests_med <- est_med(
dat = dat,
type = "NP",
t_0 = 578,
params_np = params_med_np(surv_type="survML-L")
)
# }
Run the code above in your browser using DataLab