powered by
gini(x, weights = rep(1, length = length(x)), ...)gini(x, weights = rep(1, length = length(x)), ...)
gini(x, weights = rep(1, length = length(x)), ...)
x
gini.simpson
# generate a vector (of incomes) x <- c(778, 815, 857, 888, 925, 930, 965, 990, 1012) # compute Gini index gini(x) gini(c(100,0,0,0))
Run the code above in your browser using DataLab