albersusa

Tools, Shapefiles & Data to Work with an ‘AlbersUSA’ Composite Projection

Description

Creating a composite projection for states and counties of the United States that includes scaled and shifted polygons for Alaska and Hawaii is time consuming and potentially error-prone. Functions and data sets are provided to make it easier to produce maps with a composite projection. Furthermore, named projections for common transormations are provided to further increase mapping productivity.

What’s Inside The Tin

The following functions are implemented:

• counties_sf: Retrieve a U.S. county composite map, optionally with a projection, as a simplefeature
• usa_sf: Retreive a U.S. state composite map, optionally with a projection, as a simplefeature

New ones:

• points_elided: Shift points around Alaska and Hawaii to the elided area (by @rdinter)

Some legacy ones:

• usa_composite: Retrieve a U.S. composite map, optionally with a projection
• counties_composite: Retrieve a U.S. county composite map, optionally with a projection

Pre-canned projection strings:

• us_aeqd_proj: Oblique azimuthal equidistant convenience projection
• us_eqdc_proj: Equidistant conic convenience projection
• us_laea_proj: Albers equal-area conic convenience projection
• us_lcc_proj: Lambert conformal conic convenience projection
• us_longlat_proj: Generic long/lat convenience projection

The following data sets are included:

• system.file("extdata/composite_us_states.geojson.gz", package="albersusa")
• system.file("extdata/composite_us_counties.geojson.gz", package="albersusa")

Also, the simplefeatures columns and @data slot of each SpatialPolygonsDataFrame has some handy data you can use (like FIPS codes and state/county population information).

Installation

remotes::install_git("https://git.rud.is/hrbrmstr/albersusa.git")
# or
remotes::install_git("https://git.sr.ht/~hrbrmstr/albersusa")
# or
remotes::install_gitlab("hrbrmstr/albersusa")
# or
remotes::install_bitbucket("hrbrmstr/albersusa")
# or
remotes::install_github("hrbrmstr/albersusa")

NOTE: To use the ‘remotes’ install options you will need to have the {remotes} package installed.

Usage

library(albersusa)
library(sf)
library(sp)
library(rgeos)
library(maptools)
library(ggplot2)
library(ggalt)
library(ggthemes)
library(viridis)
library(scales)

# current version
packageVersion("albersusa")
## [1] '0.4.0'

Simple features base

par(mar=c(0,0,1,0))

us_sf <- usa_sf("laea")
plot(us_sf["pop_2012"])

<img src="man/figures/README-unnamed-chunk-2-1.png" width="672" />

cty_sf <- counties_sf("aeqd")
plot(cty_sf["census_area"])

<img src="man/figures/README-unnamed-chunk-2-2.png" width="672" />

ggplot2

ggplot() +
  geom_sf(data = us_sf, size = 0.125)

<img src="man/figures/README-unnamed-chunk-3-1.png" width="672" />

ggplot() +
  geom_sf(data = us_sf, size = 0.125) +
  coord_sf(crs = us_longlat_proj)

<img src="man/figures/README-unnamed-chunk-3-2.png" width="672" />

ggplot() +
  geom_sf(data = cty_sf, size = 0.0725)

<img src="man/figures/README-unnamed-chunk-3-3.png" width="672" />

ggplot() +
  geom_sf(data = cty_sf, size = 0.0725) +
  coord_sf(crs = us_longlat_proj)

<img src="man/figures/README-unnamed-chunk-3-4.png" width="672" />

albersusa Metrics

| Lang | # Files | (%) | LoC | (%) | Blank lines | (%) | # Lines | (%) | | :--- | -------: | --: | --: | ---: | ----------: | ---: | -------: | ---: | | R | 9 | 0.9 | 106 | 0.77 | 66 | 0.67 | 277 | 0.86 | | Rmd | 1 | 0.1 | 31 | 0.23 | 32 | 0.33 | 46 | 0.14 |

Code of Conduct

Please note that this project is released with a Contributor Code of Conduct. By participating in this project you agree to abide by its terms.