# NOT RUN {
crsMerc
if(require('rgdal', quietly=TRUE))
CRS("+init=epsg:3857")
crsLL
if(require('rgdal', quietly=TRUE)) {
CRS("+init=epsg:4326")
rgdal::showEPSG("+proj=longlat")
rgdal::showEPSG(as.character(crsLL))
}
# }
Run the code above in your browser using DataLab