#' Create a national dataset of matched census and socsec data based on state matched files
#'
#' @param state_censoc_files a vector of filenames referring to state matched censoc files
#' @return a dataframe with matched census and socsec data
#' @keywords internal
create_national_censoc <- function(state_censoc_files){
tables <- lapply(state_censoc_files, read_csv)
d <- do.call(rbind , tables)
rm(tables)
all_censoc_unique <- d[!duplicated(d$clean_key),]
return(all_censoc_unique)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.