Create districtsbystate.r