if (require(USAboundariesData, quietly = TRUE) && require(sf, quietly = TRUE)) {
us_congressional <- us_congressional()
va_congressional <- us_congressional(
states = "Virginia", resolution = "high")
plot(st_geometry(us_congressional))
plot(st_geometry(va_congressional))
}
Run the code above in your browser using DataLab