R 如何将geom_sina中的所有点拟合到geom_小提琴创建的密度中？

我想让

geom_sina

绘制的点与

geom_小提琴

的分布形状相匹配

我调整了

比例

和

方法

选项，但最接近的是：

ggplot() + 
          geom_sina(aes(factor(AC_group), y=g_AD, color=factor(AC_group)), alpha=0.4, scale=F, method="counts") + 
          geom_violin(aes(factor(AC_group), y=g_AD), alpha=0.4) 

---

首先设置

方法=密度

。这将使它的缩放方式与小提琴情节大致相同。然后设置

maxwidth

参数，以便

geom_sina

生成的点位于小提琴图内。这可能会根据您的特定数据有所不同。以下是iris数据集的示例：

g <- ggplot(iris) + 
  ggforce::geom_sina(aes(x=Species, y=Sepal.Length, color=Species), alpha=0.4, scale=F, 
                     method="density", 
                     maxwidth = .6) + 
  geom_violin(aes(x=Species, y=Sepal.Length), alpha=0.4) 
g

g