R ggplot如何在jitterplot旁边放置一个boxplot

Question

我用ggplot制作了这个情节：

data <- rnorm(40,mean = 10, sd =3)
df <- data.frame(data)

p <- ggplot(df, aes(x="",y = data))+
  geom_boxplot(width=0.2)+
  geom_jitter(width = 0.02,alpha = 0.3, size=1.5)
p

我想在jitterplot旁边的右侧显示箱线图，即。他们没有重叠。我知道网格，但我想把它放在一个图中。位置=“闪避”没有帮助。

我希望我的问题不会太混乱。感谢您的帮助！

Answer 1

只有这样的x个值，您可以通过将大于1的值映射到x来向下移动箱线图。

ggplot(df, aes(x="", y = data)) +
    geom_jitter(width = 0.02,alpha = 0.3, size=1.5) +
    geom_boxplot(width=0.2, aes(x = 1.25) )

为了避免结果图的不平衡外观，可以围绕x轴标签移动两个图层。我在这里使用geom_blank来保持轴离散。

ggplot(df, aes(x="", y = data)) +
    geom_blank() +
    geom_jitter(width = 0.02, alpha = 0.3, size = 1.5, aes(x = 1.15) ) +
    geom_boxplot(width=0.2, aes(x = .85) )