more changes to the poverty/plots.r script