R/utils.R

Defines functions .lonlat .sph_merc

# sf::st_crs(4326)$proj4string
# testepsg -e "EPSG:4326"
# testepsg -e "EPSG:3857"

.sph_merc <- function() {
  ## https://github.com/ropensci/mapscanner/issues/33
  "+proj=merc +a=6378137 +b=6378137 +lat_ts=0 +lon_0=0 +x_0=0 +y_0=0 +k=1 +units=m +nadgrids=@null +wktext +no_defs"
}

.lonlat <- function() {
  "+proj=longlat +datum=WGS84 +no_defs"

}

Try the mapscanner package in your browser

Any scripts or data that you put into this service are public.

mapscanner documentation built on Nov. 26, 2021, 1:07 a.m.