r.med.sub: Average affluence gap in subpopulation
In affluenceIndex: Affluence (Richness) Indices

Description Usage Arguments Value Author(s) References See Also Examples

Computes the average affluence gap in subpopulation.

1	r.med.sub(x.sub, x, weight.sub, weight, k)

`x`	income vector of subpopulation
`x.sub`	income vector of population
`weight.sub`	weight vector of subpopulation
`weight`	weight vector of population
`k`	multiple of the median income

gap

the gap value

Alicja Wolny-Dominiak

Medeiros M. (2006) The rich and the poor: the construction of an affluence line from the poverty line. Social Indicators Research, 78, pp. 1-18.

r.med

data(affluence)
affluence$weight <- rep(1, nrow(affluence))
aff.sub <- subset(affluence, education == 2)
r.med.sub(aff.sub$income, affluence$income, aff.sub$weight, affluence$weight, 2)