data-raw/prep-zip-lookup.R

library(tidyverse)

lookup <- read_csv("data-raw/zcta_county_rel_10.txt")

out <- select(lookup, ZCTA5, STATE, COUNTY)

write_rds(out, "data/zcta_lookup.rds")
walkerke/tigris documentation built on March 30, 2024, 9:28 p.m.