Downloads block geography and merges with the cleaned PL 94-171 file.
pl_tidy_shp(abbr, path, year = 2020, type = c("blocks", "vtds"), ...)The state to make the shapefile for
The path to the PL files, as in pl_read()
The year to download the block geography for. Should match the year of the PL files.
If "blocks", make a Census block shapefile; if "vtds" make a
VTD shapefile.
passed on to dplyr::filter(); use to subset to a certain county,
for example.
an sf object with demographic and shapefile information for the
state.
# \donttest{
pl_ex_path <- system.file("extdata/ri2018_2020Style.pl", package = "PL94171")
pl_tidy_shp("RI", pl_ex_path)
#> Simple feature collection with 569 features and 24 fields (with 569 geometries empty)
#> Geometry type: GEOMETRY
#> Dimension: XY
#> Bounding box: xmin: NA ymin: NA xmax: NA ymax: NA
#> Geodetic CRS: NAD83
#> # A tibble: 569 × 25
#> GEOID state county vtd pop pop_hisp pop_white pop_black pop_aian
#> <chr> <chr> <chr> <chr> <int> <int> <int> <int> <int>
#> 1 4400700010110… RI NA 4428… 0 0 0 0 0
#> 2 4400700010110… RI NA 4428… 0 0 0 0 0
#> 3 4400700010110… RI NA 4428… 0 0 0 0 0
#> 4 4400700010110… RI NA 4428… 50 0 50 0 0
#> 5 4400700010110… RI NA 4428… 0 0 0 0 0
#> 6 4400700010110… RI NA 4428… 0 0 0 0 0
#> 7 4400700010110… RI NA 4428… 18 18 0 0 0
#> 8 4400700010110… RI NA 4428… 0 0 0 0 0
#> 9 4400700010110… RI NA 4428… 86 86 0 0 0
#> 10 4400700010110… RI NA 4428… 19 0 0 19 0
#> # ℹ 559 more rows
#> # ℹ 16 more variables: pop_asian <int>, pop_nhpi <int>, pop_other <int>,
#> # pop_two <int>, vap <int>, vap_hisp <int>, vap_white <int>, vap_black <int>,
#> # vap_aian <int>, vap_asian <int>, vap_nhpi <int>, vap_other <int>,
#> # vap_two <int>, area_land <dbl>, area_water <dbl>,
#> # geometry <GEOMETRYCOLLECTION [°]>
# }