inequality - Generalized Gini with Weights in R

Question

I want to calculate weighted generalized gini coefficients. CRAN distributes the "acid" package with a suitable function.

What am i missing here? When weights are constant, the estimates of weighted.gini and sgini are equal given the parameter nu = 2 (as to get the regular gini). When weights are nonconstant, they differ. Is there something fishy going on or am i missing something? They ought to be the same, right?

Checked back with STATA sgini function by van Kerm which is cited in the documentation of acid and its function returns the expected same estimates.

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,10,1)
acid::weighted.gini(x,w)$Gini
acid::sgini(x,w,nu=2)$Gini

question from:https://stackoverflow.com/questions/65884289/generalized-gini-with-weights-in-r

Answer 1

Waitting for answers