问题描述
我想计算加权广义基尼系数。 CRAN 分发了具有合适功能的“acid”包。
我在这里错过了什么？当权重恒定时，给定参数 nu = 2（以获得常规基尼系数），weighted.gini 和 sgini 的估计值相等。当权重非常数时，它们是不同的。有什么可疑的事情发生还是我错过了什么？他们应该是一样的，对吧？
使用 van Kerm 的 STATA sgini 函数进行检查，该函数在 acid 文档中被引用，其函数返回预期的相同估计值。
set.seed(123)
install.packages("acid")
library(acid)
x <- rnorm(100,10,1)
w <- rep(1,length(x))
acid::weighted.gini(x,w)$Gini
acid::sgini(x,w,nu=2)$Gini
w <- rnorm(100,1)
acid::weighted.gini(x,nu=2)$Gini
解决方法
暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！
如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。
小编邮箱:dio#foxmail.com (将#修改为@）