r - 散点图和箱线图叠加

Question

基于之前的帖子 ggplot boxplots with scatterplot overlay (same variables) ,

我想要一周中的每一天一个箱线图 而不是两个箱线图 同时有不同颜色的散点。

代码将如下所示:

#Box-plot for day of week effect
plot1<-ggplot(data=dodgers, aes(x=ordered_day_of_week, y=Attend)) + geom_boxplot()

#Scatter with specific colors for day of week
plot2<-ggplot(dodgers, aes(x=ordered_month, y=Attend, colour=Bobblehead, size=1.5)) + geom_point()

#Box-ploy with Scatter plot overlay
plot3<-ggplot(data=dodgers, aes(x=ordered_day_of_week, y=Attend, colour=Bobblehead)) + geom_boxplot() + geom_point()

结果将是:
1、散点图



2、箱线图


3、组合图

Answer 1

把 color=内aes()的 geom_point()并将其从 ggplot() 中删除aes() .如果你把 color=内ggplot()那么它会影响所有几何体。您也可以考虑使用位置闪避来分隔点。

示例与 mtcars数据，因为 OP 没有提供数据。

ggplot(mtcars,aes(factor(cyl),mpg))+geom_boxplot()+
  geom_point(aes(color=factor(am)),position=position_dodge(width=0.5))