如何在R语言MatchIt包中正确计算eCDF Mean值
MatchIt包eCDF Mean计算偏差原因及正确方法
偏差原因
你计算得到的均值与MatchIt输出不一致,核心错误出在C=na.omit(C)这一步:你直接删除了仅在处理组或仅在对照组中出现的年龄取值点,只保留了两组共有的取值点计算差值平均。但eCDF是右连续的阶梯函数,在全样本所有取值点上都有对应的值,这些仅在单组出现的点的eCDF差值也需要纳入平均计算。而eCDF Max本身只会出现在两组都有观测的阶梯拐点上,所以你之前计算的最大值结果是正确的。
正确计算方法
eCDF Mean的计算逻辑是:取处理组和对照组所有协变量取值的唯一值作为计算点,分别计算两组eCDF在所有计算点上的取值,求差值绝对值的算术平均即可,对应实现代码如下:
library(MatchIt) data("lalonde") # 拆分处理组、对照组的age变量 treat_age <- lalonde$age[lalonde$treat == 1] control_age <- lalonde$age[lalonde$treat == 0] # 生成两组的eCDF函数 ecdf_treat <- ecdf(treat_age) ecdf_control <- ecdf(control_age) # 提取全样本所有唯一年龄值作为计算点 all_age_points <- sort(unique(c(treat_age, control_age))) # 计算所有点的eCDF差值绝对值的均值 ecdf_mean <- mean(abs(ecdf_treat(all_age_points) - ecdf_control(all_age_points))) # 输出结果为0.0813,与MatchIt输出完全一致
内容的提问来源于stack exchange,提问作者Jasmine Helen
相关产品推荐
相关产品推荐

