着色海洋(使用naturalearth数据) - 渲染问题

时间:2017-02-25 23:09:43

标签: r ggplot2 maps clipping

要将海洋添加到地图中,我正在考虑将rnaturalearth包与ocean50数据一起使用。

devtools::install_github("ropenscilabs/rnaturalearth")

library(rnaturalearth)
library(ggplot2)
library(ggalt)

ocean50 <- ne_download(scale = 50, type = 'ocean', category = 'physical')
plot(ocean50, col="lightblue")
o<-fortify(ocean50)
gg<-ggplot() +
  geom_cartogram(aes(long, lat, map_id = id), data=o, map=o, fill="lightblue")
但似乎美洲大陆消失了。

enter image description here

此外,当我尝试

gg + coord_map("ortho", orientation = c(4.22, 18.35, 0))+theme_map()

大陆而非海洋是彩色的

enter image description here

有关如何解决此问题的任何建议?有没有一种基于方向剪辑的简单方法?

0 个答案:

没有答案