corrected the county formatting within the R programs