【发布时间】:2020-08-03 14:13:59
【问题描述】:
我想知道是否有人知道如何在 R 中为地图和栅格实现 Equal Earth Projection?
我找到了这个教程:
https://rud.is/b/2018/09/28/quick-hit-using-the-new-equal-earth-projection-in-r/
但我无法复制它。似乎“+proj=eqearth”不可用,但现在看来应该可用。
library(rgdal)
library(maps)
library(maptools)
RobinsonProj="+proj=robin +lon_0=0 +x_0=0 +y_0=0 +ellps=WGS84 +datum=WGS84 +units=m +no_defs"
EqualEarthProj= "+proj=eqearth +lon_0=0 +x_0=0 +y_0=0 +ellps=WGS84 +datum=WGS84 +units=m +no_defs"
LatLonProj="+proj=longlat +datum=WGS84"
worldmap <- maps::map("world", plot=F,interior = F,wrap=c(-180,180)) #create map of the world
worldmapLines <- map2SpatialLines(worldmap, proj4string=CRS(LatLonProj))
#reproject
RobinsonMap <- spTransform(worldmapLines, CRS(RobinsonProj))
LatLonMap <- spTransform(worldmapLines, CRS(LatLonProj))
EqualEarthMap <- spTransform(worldmapLines, CRS(EqualEarthProj))
【问题讨论】: