Voir le code R
library(did)
# Estimation des ATT(g,t)
att_gt_res <- att_gt(
yname = "lemp", # variable de résultat
tname = "year", # variable de temps
idname = "countyreal", # identifiant des unités
gname = "first.treat", # année du 1er traitement (0 = jamais traité)
data = mpdta,
control_group = "nevertreated", # groupe de comparaison
est_method = "reg" # méthode d'estimation
)
summary(att_gt_res)#>
#> Call:
#> att_gt(yname = "lemp", tname = "year", idname = "countyreal",
#> gname = "first.treat", data = mpdta, control_group = "nevertreated",
#> est_method = "reg")
#>
#> Reference: Callaway, Brantly and Pedro H.C. Sant'Anna. "Difference-in-Differences with Multiple Time Periods." Journal of Econometrics, Vol. 225, No. 2, pp. 200-230, 2021. <https://doi.org/10.1016/j.jeconom.2020.12.001>, <https://arxiv.org/abs/1803.09015>
#>
#> Group-Time Average Treatment Effects:
#> Group Time ATT(g,t) Std. Error [95% Simult. Conf. Band]
#> 2004 2004 -0.0105 0.0237 -0.0744 0.0534
#> 2004 2005 -0.0704 0.0299 -0.1510 0.0101
#> 2004 2006 -0.1373 0.0377 -0.2386 -0.0359 *
#> 2004 2007 -0.1008 0.0342 -0.1928 -0.0088 *
#> 2006 2004 0.0065 0.0230 -0.0554 0.0685
#> 2006 2005 -0.0028 0.0194 -0.0550 0.0495
#> 2006 2006 -0.0046 0.0182 -0.0536 0.0445
#> 2006 2007 -0.0412 0.0203 -0.0958 0.0133
#> 2007 2004 0.0305 0.0144 -0.0083 0.0694
#> 2007 2005 -0.0027 0.0170 -0.0486 0.0431
#> 2007 2006 -0.0311 0.0186 -0.0812 0.0191
#> 2007 2007 -0.0261 0.0168 -0.0713 0.0192
#> ---
#> Signif. codes: `*' confidence band does not cover 0
#>
#> P-value for pre-test of parallel trends assumption: 0.16812
#> Control Group: Never Treated, Anticipation Periods: 0
#> Estimation Method: Outcome Regression