county_grid_example.R

library(geofacet)

# get Connecticut county boundaries from USAboundaries package
counties <- USAboundaries::us_counties(states = "connecticut")

# convert to SpatialPolygonsDataFrame
# (will be more tolerant of different spatial types in the future)
counties <- as(counties, "Spatial")

# remove unneeded columns
counties@data <- counties@data[, c("countyfp", "name")]

# this gives a good initial approximation
grd <- grid_auto(counties, seed = 1234)

# this allows further tweaking and submission
grid_design(grd, label = "name")