r - 根据密度抖动

Question

我想用 ggplot 创建 fiddle 图和点图的组合。这个想法是在必要时将点向左和向右移动，以避免重叠。
我知道 geom_dotplot 执行此操作(左示例)，但它还将 y 轴上的点分组，这是我不想要的(给人的印象是 y 不连续)。 geom_jitter 也可以工作，但这样它会抖动独立于相应密度的值。

所以我的理想图是 geom_dotplot 的 x 位置，但具有真实的 y 位置。有没有办法用 ggplot 实现这一目标？

library(ggplot2)
data <- data.frame(values=c(rnorm(100, mean = 0),rnorm(100, mean = 1)), typ= c(rep("A",100),rep("B",100)))

ggplot(data, aes(x=typ,y=values))+
  geom_violin()+
  geom_dotplot(binaxis="y",stackdir='center',binwidth = 0.1)

ggplot(data, aes(x=typ,y=values))+
  geom_violin()+
  geom_jitter(width = 0.2)

预先感谢。

Answer 1

根据评论，您可以使用 ggbeeswarm。我会用 geom_quasirandom对于这种情况。

library(ggplot2)
library(ggbeeswarm)

data <- data.frame(values=c(rnorm(100, mean = 0),rnorm(100, mean = 1)), typ= c(rep("A",100),rep("B",100)))

ggplot(data, aes(x=typ,y=values))+
  geom_violin()+
  geom_quasirandom()

创建于 2020-07-28 由 reprex package (v0.3.0)