散点图和箱线图叠加

use*_*seR 7 r ggplot2

基于之前的带有散点图叠加的ggplot箱图(相同的变量),

我希望每周的每一天都有一个箱形图而不是两个箱形图,同时在它上面有不同颜色的散点图.

代码如下:

#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()
Run Code Online (Sandbox Code Playgroud)

结果将是:
1,散点图

在此输入图像描述

2,boxplot情节 在此输入图像描述

3,合并情节 在此输入图像描述

Did*_*rts 9

color=里面aes()geom_point()和删除ggplot() aes().如果你放在color=里面ggplot()它会影响所有的geoms.你也可以考虑使用位置闪避来分离点数.

mtcars数据为OP的示例未提供数据.

ggplot(mtcars,aes(factor(cyl),mpg))+geom_boxplot()+
  geom_point(aes(color=factor(am)),position=position_dodge(width=0.5))
Run Code Online (Sandbox Code Playgroud)

在此输入图像描述