if (FALSE) {
out <- fect(Y ~ D, data = df, index = c("unit", "time"), method = "fe", se = TRUE)
out_sens <- fect_sens(
fect.out = out,
post.periods = c(1, 2, 3, 4),
Mbarvec = seq(0, 1, by = 0.2),
Mvec = c(0, 0.05, 0.1),
periodMbarvec = c(0, 0.5),
periodMvec = c(0, 0.1)
)
names(out_sens$sensitivity.rm)
names(out_sens$sensitivity.smooth)
}
Run the code above in your browser using DataLab