# NOT RUN {
dt <- lagos_load("1.087.1")
res <- coordinatize(dt$locus)
library(maps)
map("state", xlim = c(-97.90363, -66.99892), ylim = c(34.61761, 49.41941))
plot(res$geometry, add = TRUE, pch = 19, cex = 0.05)
# }
Run the code above in your browser using DataCamp Workspace