# NOT RUN {
library(dplyr)
data(sanction)
z.att <- zelig(num ~ target + coop + mil, model = "poisson",
data = sanction) %>%
ATT(treatment = "mil") %>%
get_qi(qi = "ATT", xvalue = "TE")
# }
Run the code above in your browser using DataLab