使用Overdraw mean points in grouped boxplot with ggplot2中提供的建议我尝试了
FEV <- expand.grid(sex=c('female', 'male'), smoke=c('no', 'yes'),
reps=1:5)
set.seed(1)
FEV$fev <- runif(nrow(FEV), 1, 4)
ggplot(FEV, aes(x=smoke, y=fev, color=sex)) +
geom_boxplot(alpha=.5, width=.2) + # remove width to overlay boxes on pts
stat_summary(fun.y=mean, geom="point", shape=5, size=2,
position=position_dodge(width=.2)) +
geom_dotplot(binaxis='y', stackdir='center', position='dodge') +
xlab('') + ylab(expression(FEV[1])) + coord_flip()
垂直方向上的装置放置不正确。指导欢迎。注意:我喜欢两组点之间的盒子图;那不是问题。
答案 0 :(得分:1)
?position_dodge的帮助只是说躲避不同宽度的东西很棘手 - 我通常会手动调整它。尝试几个值,看起来你想要点的闪避宽度是箱图宽度的3/4,但我不知道为什么或者如果它适用于其他geoms。我会尝试将stat_summary调用的宽度更改为0.15