我正在尝试计算匹配后对Avergae的治疗效果(ATT)。主要问题是我正在尝试重现由逝世的我的一个同事编写的旧代码... Zelig软件包从那时起发生了变化,尽管我尝试了许多不同的方式,但无法重现他的机制。旧代码是:
z.treat <- zelig(OF, data=CNTRL_G, model="ls")
x.treat <- setx(z.treat, data=TREAT_G, cond=TRUE)
s.treat <- sim(z.treat, x=x.treat)
z.control <- zelig(OF, data=TREAT_G, model="ls")
x.control <- setx(z.treat, data=CNTRL_G, cond=TRUE)
s.control <- sim(z.control, x=x.control)
att <- s.treat$qi$att.ev
ate <- c(s.treat$qi$att.ev, -s.control$qi$att.ev)
其中TREAT_G和CNTRL_G是从以前使用MatchIt完成的匹配中提取的。
新的Zelig似乎不支持这种ATT撤退。但是,我不知道如何以新格式运行它。 任何帮助将不胜感激!