向ggplot添加平均线

Question

我想建立在this example斜坡上的调节线颜色为平均线添加一条线（从平均值t = 1到平均值t = 2的线）。

library(dplyr) 
set.seed(205) 
dat = data.frame(t=rep(1:2, each=10), 
       pairs=rep(1:10,2), 
       value=rnorm(20)) 

ggplot(dat %>% group_by(pairs) %>% 
     mutate(slope = (value[t==2] - value[t==1])/(2-1)), 
     aes(t, value, group=pairs, colour=slope > 0)) + 
    geom_point() + 
    geom_line() 

我试着添加stat_summary(fun.y=mean, geom="line")没有任何运气。

计算失败stat_summary()：“什么”必须是一个函数或字符串

Answer 1

我没有得到你描述（用GGPLOT2 v 2.2.0）的错误，但为了得到我希望得到的结果必须覆盖您在主图中指定的分组：

stat_summary(fun.y=mean,geom="line",lwd=2,aes(group=1))