在Rastervis中使用gplot方法时如何去除背景灰色？

Question

有没有人知道，在Rastervis中使用gplot方法时，如何去除背景灰色？我已经尝试删除主题颜色，但它不起作用。

r <- raster(system.file("external/test.grd", package="raster"))
s <- stack(r, r*2)
names(s) <- c('meuse', 'meuse x 2')

library(ggplot2)

theme_set(theme_bw())
gplot(s) + geom_tile(aes(fill = value)) +
    facet_wrap(~ variable) +
    scale_fill_gradient(low = 'white', high = 'blue') +
    coord_equal() +
    theme(
            plot.background = element_blank()
            ,panel.grid.major = element_blank()
            ,panel.grid.minor = element_blank()
            ,panel.border = element_blank()
            ,panel.background = element_blank())

​

​

Answer 1

我已经从rasterVis here https://github.com/oscarperpinan/rastervis/issues/13#comments的作者那里得到了答案

Answer 2

通过@Bingwei提供的链接，我发现使用scale_fill_gradient(low = 'white', high = 'blue', na.value=NA))对我很有效。请注意na.value=NA而不是na.value="white"。