我在 ggmap
包中使用了 Stamen 背景 map 。我想用 "#C0C0C0"
替换光栅背景图像中的所有黑色元素(即颜色 "#000000"
- 基本上看起来更像 toner light 背景 map )。
library(ggmap)
loc <- c(left = -73.706, bottom = 42.6940, right = -73.648, top = 42.7921)
troy <- get_map(location = loc, zoom = 13, maptype = "toner", source = "stamen")
ggmap(troy)
按照下面的方法替换颜色只会返回光栅部分,并去除其 ggmap 类的对象。
class(troy)
troy[troy == "#000000"] <- "#C0C0C0"
ggmap(troy)
class(troy)
有没有办法在不改变其他属性的情况下替换栅格像元?
最佳答案
您可以手动更改 class
和 attr
以匹配原始栅格。
library(ggmap)
loc <- c(left = -73.706, bottom = 42.6940, right = -73.648, top = 42.7921)
troy <- get_map(location = loc, zoom = 13, maptype = "toner", source = "stamen")
attr_troy <- attr(troy, "bb") # save attributes from original
# change color in raster
troy[troy == "#000000"] <- "#C0C0C0"
# correct class, attributes
class(troy) <- c("ggmap", "raster")
attr(troy, "bb") <- attr_troy
ggmap(troy)
关于r - 如何替换 ggmap 对象中的颜色?,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/18859809/