r - 避免R中的几何点重叠

Question

我正在使用以下代码在地图上绘制点

crime_poss_drugs$colorbucket<- as.numeric(cut(crime_poss_drugs$count,c(0,100,200,300,400,500,600,700,800,900,1100,Inf)))
crime_prod_drugs$colorbucket<- as.numeric(cut(crime_prod_drugs$count,c(0,100,200,300,400,500,600,700,800,900,1100,Inf)))
ggmap(Map) +
   geom_point(data = crime_poss_drugs,shape=22,
        aes(x = lon, y = lat, colour=factor(colorbucket)))+
   geom_point(data = crime_prod_drugs,
        aes(x = lon, y = lat,colour=factor(colorbucket)))

但问题是，geom_point() 的两层都有重叠点。任何人都可以建议我如何避免在同一纬度经度位置重叠的表示。我在这里先向您的帮助表示感谢。

Answer 1

更改 alpha 值是一个很好的建议。另一种选择是抖动点，即添加一点随机噪声，这样它们就不会发生太多碰撞。（这在某些情况下比其他情况更有意义——这确实是一个实质性问题。）如果您好奇，请查看geom_jitter 文档。