update data
a listing of fips codes in R, in the order they are mapped, with a few key exceptions
R plot script