# NOT RUN {
# load necessary packages ----
library(sf)
# load necessary data ----
data("city_boundary_sf")
# plot Chicago ----
par(mar = c(0, 0, 1, 0))
plot(city_boundary_sf$geometry
, main = "City of Chicago boundary"
, col = "gray85"
, border = "dodgerblue4")
# }
Run the code above in your browser using DataLab