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