split choroplethr from choroplethrMaps. Add back in alaskan west aleutian islands into df_pop_county