组合的盒子小提琴图未对齐

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")