if (FALSE) {
dt <- lagosne_load("1.087.3")
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 DataLab