Question

我正在学习栅格图层上的内容，我可以使用inset_raster（）在ggmap上放置栅格图层。以下是示例代码：

library(ggmap)
library(animation)

auckland <- get_map(location = "Auckland",
                   zoom = 14,
                   scale = 2, ## 1280*1280 pixels
                   maptype = "roadmap",
                   color = "color")


auckland_vis <- ggmap(ggmap = auckland)

auckland_vis 

rainbow <- matrix(seq(360, 2000, length = 50 * 50), nrow = 50)
rainbow[sample(1:length(rainbow), 2400, replace = FALSE)] <- NA
rainbow.r <- raster(rainbow)


## inset_raster is used to put a raster layer on a ggmap
auckland_vis + 
  inset_raster(rainbow.r, xmin = attributes(auckland)$bb$ll.lon,
                    xmax = attributes(auckland)$bb$ur.lon,
                    ymin = attributes(auckland)$bb$ll.lat,
                    ymax = attributes(auckland)$bb$ur.lat
               )

请忽略地图上的点是否合理。我知道在使用plot()时如何更改栅格数据的颜色。我还想知道如何更改ggmap中点的颜色。现在颜色总是白色，粉红色，黄色和绿色（如果我想要的颜色是蓝黄色和红色）。是否有一个可以像ggplot中那样指定颜色的函数？

提前致谢

如何在组合栅格图层和ggmap时更改栅格数据的颜色

0 个答案: