How do you decompose inequality in R, say by gender?

	[[alternative HTML version deleted]]

