powered by
Computes income share of the top p % in subpopulation.
r.is.sub(x.sub, x, weight.sub, weight, p)
the value of index
income vector of subpopulation
income vector of population
weight vector of subpopulation
weight vector of population
the order of quantile. Must be in [0,1] as probability
Alicja Wolny-Dominiak, Anna Saczewska-Piotrowska
Brzezinski M. (2010) Income affluence in Poland. Social Indicators Research, 99, pp. 285-299.
r.is
data(affluence) affluence$weight <- rep(1, nrow(affluence)) aff.sub <- subset(affluence, education == 2) r.is.sub(aff.sub$income, affluence$income, aff.sub$weight, affluence$weight, 0.9)
Run the code above in your browser using DataLab