data-raw/fsa_contig.R

In tweed1e/matchtools: Tools For Matching Firms From Different Datasets

# hmm, tidytext puts all their data-raw processing code into one file, setup_data.R

library(dplyr)
fsa_contig <- readr::read_csv('data-raw/fsa_contig.csv')
fsa_contig <- fsa_contig %>% select(CFSAUID, CFSAUID_1)
names(fsa_contig) <- c("fsa", "contiguous_fsa")
fsa_contig <- fsa_contig %>% arrange(fsa, contiguous_fsa)
devtools::use_data(fsa_contig, internal = TRUE, overwrite = TRUE)