df <- RobinCar:::data_sim
df$y_bin = ifelse(df$y>2.5, 1, 0)
robincar_mh(df = df[df$A!=2,],
treat_col = "A",
response_col = "y_bin",
strata_cols = c("z1", "z2"),
estimand = "MH",
ci_type = "mGR")
Run the code above in your browser using DataLab