if (FALSE) {
data(mpdta)
out <- att_gt(yname = "lemp",
gname = "first.treat",
idname = "countyreal",
tname = "year",
xformla = ~1,
data = mpdta)
# plot all group-time average treatment effects
ggdid(out)
# plot event study aggregation
es <- aggte(out, type = "dynamic")
ggdid(es)
}
Run the code above in your browser using DataLab