如何给海洋上色？

Question

我正在尝试使用basemap()函数制作地图

library(ggplot2)
library(ggOceanMapsData)
library(ggOceanMaps)

dt <- expand.grid(lon = c(-129, -124), lat = c(49, 53))
basemap(data = dt,land.border.col = "grey40")

我找到了一种给陆地上色的方法，但没有找到海洋的颜色。

我试着做theme(panel.background = element_rect(fill = "lightblue"))，但它只是覆盖了图形顶部的这一层，我不知道如何在后面传输它，所以基线地图是可见的。

Answer 1

不确定是否可以通过任何命令用一种颜色填充海洋。这里有一个变通方法，将所有用于水深测量的颜色都设置为一个颜色。

library(ggplot2)
library(ggOceanMapsData)
library(ggOceanMaps)

dt <- expand.grid(lon = c(-129, -124), lat = c(49, 53))

basemap(data = dt, land.border.col = "grey40", bathymetry = T, legends = F) + 
  scale_fill_manual(values = c(rep("lightblue", 7)))