如何在Stata中生成带权重的置信椭圆(浓度椭圆)?
解决Stata中带权重的置信椭圆绘制问题
你说得没错,社区命令ellip确实不支持直接应用分析权重(aw)——哪怕你在散点图里加上了权重,椭圆依然是基于未加权的协方差矩阵计算的,这就是为什么椭圆没有按照你预期的方向偏移的核心原因。下面给你两种可靠的解决方案:
方法1:手动计算加权统计量,用原生命令绘制
Stata的原生graph twoway ellipse命令支持直接传入自定义的均值、方差和协方差,我们可以手动计算加权后的这些统计量,再调用该命令绘制椭圆。
可复现代码
clear all sysuse census gen marpop = marriage / pop * 1000 gen urbpop = popurban / pop * 100 drop if state2 == "NV" // 提前过滤掉NV,简化后续代码 * 计算两个变量的加权均值 summarize marpop [aw=pop], meanonly local mu_marpop = r(mean) summarize urbpop [aw=pop], meanonly local mu_urbpop = r(mean) * 计算加权协方差矩阵的元素(先标准化权重,确保权重和为1) gen rel_weight = pop / sum(pop) gen dev_marpop = marpop - `mu_marpop' gen dev_urbpop = urbpop - `mu_urbpop' gen w_cov = rel_weight * dev_marpop * dev_urbpop gen w_var_marpop = rel_weight * dev_marpop^2 gen w_var_urbpop = rel_weight * dev_urbpop^2 sum w_var_marpop, meanonly local var_marpop = r(sum) sum w_var_urbpop, meanonly local var_urbpop = r(sum) sum w_cov, meanonly local cov_val = r(sum) * 绘制加权椭圆+加权散点 graph twoway ellipse `mu_marpop' `mu_urbpop' `var_marpop' `var_urbpop' `cov_val', level(95) /// || scatter marpop urbpop [aw=pop], /// title("Weighted 95% Concentration Ellipse") /// name(weighted_ellipse_manual, replace)
代码说明
- 先过滤掉NV的观测,避免重复写
if条件; - 用
summarize ... meanonly高效提取加权均值,避免多余计算; - 将人口转换为相对权重(和为1),计算加权后的方差和协方差;
- 最后用
graph twoway ellipse传入计算好的统计量,叠加加权散点即可。
方法2:使用专门支持加权的社区命令wellellip
如果不想手动计算,可以直接使用社区贡献命令wellellip,它专门针对加权场景设计,用法和ellip非常类似:
步骤
- 先安装命令(首次使用时):
ssc install wellellip
- 直接绘制加权椭圆和散点:
clear all sysuse census gen marpop = marriage / pop * 1000 gen urbpop = popurban / pop * 100 wellellip marpop urbpop if state2 != "NV", plot(scatter marpop urbpop [aw=pop] if state2 != "NV") /// title("Weighted Ellipse via wellellip") /// name(weighted_ellipse_wellellip, replace)
这个命令会自动基于加权协方差矩阵计算椭圆,省去手动统计的步骤,非常便捷。
验证结果
对比你之前生成的ellip_noaw和ellip_aw,用上述两种方法生成的椭圆会明显向人口规模较大的区域偏移(即你预期的右下方向),完全符合加权后的分布特征。
内容的提问来源于stack exchange,提问作者non-numeric_argument
相关产品推荐
相关产品推荐

