r - 组合箱-小提琴图未对齐

Question

我想使用带有箱线图的小提琴图绘制二维分布图。结果可能非常令人着迷，但前提是做得正确。

ToothGrowth$dose <- as.factor(ToothGrowth$dose)
head(ToothGrowth)
plot <- ggplot(ToothGrowth, aes(x=dose, y=len, fill=supp)) +
  geom_violin() + geom_boxplot(width=0.1)  + theme(legend.position="none")
ggsave(filename="Violinboxplot.png", plot, height=6, width=4)

然而，这就是我得到的：

箱线图沿属于该因子的轴对齐。如何将它们移动到小提琴图的中心？

Answer 1

这里有这个问题的答案： how to align violin plots with boxplots

您可以根据需要使用 position 参数来移动图形元素：

dodge <- position_dodge(width = 0.5)

ggplot(ToothGrowth, aes(x=dose, y=len, fill=supp)) +
  geom_violin(position = dodge) +
  geom_boxplot(width=.1, position = dodge) +
  theme(legend.position="none")