# NOT RUN {
if(requireNamespace("curl") &
curl::has_internet() &
require(sp)) {
# create coordinates
x <- -115.3823
y <- 48.88228
# fetch PLSS geometry for these coordinates
p.plss <- LL2PLSS(x, y)
# plot geometry
plot(p.plss$geom)
}
# }
Run the code above in your browser using DataLab