data-raw/precinctlayout.R

In amkessler/precinctsopenelex: Helps Process Precinct Results For OpenElex Project

## code to prepare `precinctlayout` dataset goes here

usethis::use_data(precinctlayout, overwrite = TRUE)


#read in one of the races, in this case presidential from Saratoga County, NY
#this will show the format the data should be in before beginning this process
sample_prez <- system.file("extdata",
                           "Saratoga_NY_GE20_cleaned.xlsx",
                           package = "precinctsopenelex")

precinctsampledata_ny <- readxl::read_excel(sample_prez,
                                    sheet = "presidential")


#use this dataset for the package to have a working sample to let people use and understand
usethis::use_data(precinctsampledata_ny)