r - ggplot2:根据填充值为某些点设置alpha = 0

Question

我目前正在从事一个涉及创建绘图的项目，该绘图与Hadley的ggplot2 0.9.0页中有关stat_density2d()的示例非常相似。

library(ggplot2)
dsmall <- diamonds[sample(nrow(diamonds), 1000), ]
d <- ggplot(dsmall, aes(carat, price)) + xlim(1,3)
d + stat_density2d(geom="tile", aes(fill = ..density..), contour = FALSE)
last_plot() + scale_fill_gradient(limits=c(1e-5,8e-4))

现在，我正在努力的一种方法是为所有不在填充范围内的图块基本上关闭alpha(alpha = 0)。因此，图像中看到的每个灰色图块都应将alpha设置为0。这会使图像更加美观，尤其是例如在 map 上叠加时。

如果有人有任何建议，将不胜感激。

Answer 1

这似乎可行:

d + stat_density2d(geom="tile", 
     aes(fill = ..density.., 
     alpha=cut(..density..,breaks=c(0,1e-5,Inf))), 
     contour = FALSE)+
 scale_alpha_manual(values=c(0,1),guide="none")