r - ggplot2:geom_point 边界和填充的不同 alpha 值

Question

我想使用 geom_point 将我的数据绘制为点图。我的数据点重叠，所以我想使用抖动和透明度来增加可见性。现在我还想为每个数据点添加一个边框，让读者更容易看到每个数据点。但是，由于 alpha，看起来我的数据点周围有光晕。这就是为什么我只想将 alpha 用于填充而 alpha=0 用于边框。但到目前为止我还没有找到解决方案。我可以绘制两个 geom_points，一个比另一个稍大，以在每个点周围创建一个边界，alpha=0。但是因为我需要抖动，所以相同的数据点不会相互重叠。
有谁知道如何解决这个问题？

这是我的代码:

ggplot(data=comp24, aes(x=spatial, y=lnfit, colour=spatial, fill=spatial, shape=spatial, backgroundColor="white", na.rm=T))+
geom_point(position=position_jitter(w=0.5), size=1.75, alpha=0.2, stroke=0.3)+
scale_colour_manual(name="spatial structure", values = c("black", "black", "black"))+
scale_fill_manual(name="spatial structure", values = c("black","black", "black"))

还有一些数据:

spatial focal competitor       lnfit
low   pco        pch -1.79175947
low   pco        pch -1.49165488
low   pco        pch -0.98082925
low   pco        pch -1.97716269
intermediate   pco        pch -0.84729786
intermediate   pco        pch -0.48379695
intermediate   pco        pch -0.64574494
intermediate   pco        pch -0.51082562
intermediate   pco        pch  1.43693809
high   pco        pch  0.89608802
high   pco        pch  0.04879016
high   pco        pch -2.20625398
high   pco        pch  0.31003898
high   pco        pch -0.01694956

这是图表的细节，它显示了我正在谈论的光环。我猜它来自填充和边框有点重叠。这就是为什么我在灰色区域内看到这条 draker 线的原因。不幸的是，更改笔划值只会增加光环效果。



我将我的图表保存为 .tif 文件:

tiff('C:/_..._..._.tif', bg = "white", res = 1600, width = 115, height = 160, units = "mm", compression="lzw")

期待您的建议。

干杯
安妮

Answer 1

这应该适合你:

ggplot(data=comp24, aes(x=spatial, y=lnfit, colour=spatial, fill=spatial, shape=spatial, backgroundColor="white", na.rm=T))+
geom_point(position=position_jitter(w=0.5), size=1.75, stroke=0.3)+
scale_colour_manual(name="spatial structure", values = c("black", "black", "black"))+
scale_fill_manual(name="spatial structure", values =alpha(c("black","black", "black"),0.2))

让我知道