我正尝试在用ggRGB绘制的RGB上叠加一个带有ggR的光栅。部分ggR光栅具有NA值(或者这也可以是零),这些值应该是透明的,并显示底层的RGB光栅。如何实现这一点有什么帮助吗?
library(RStoolbox)
library(tidyverse)
data(rlogo)
im <- rlogo[[1]]
im[im>100]=NA
im[im<=100]=1
ggRGB(rlogo, r=1, g=2, b=3)+ggR(im,ggLayer=T,geom_raster=T)+
scale_fill_gradientn(colours=rainbow(1),na.value="transparent")
发布于 2019-10-27 18:40:46
“透明”是问题所在。
library(RStoolbox)
library(tidyverse)
data(rlogo)
im <- rlogo[[1]]
im[im>100]=NA
im[im<=100]=1
ggRGB(rlogo, r=1, g=2, b=3)+ggR(im,ggLayer=T,geom_raster=T)+
scale_fill_gradientn(colours=rainbow(1),na.value=NA)
这应该会起作用。
https://stackoverflow.com/questions/51077505
复制相似问题