6

I want to add trendlines to my ggplot, but only for the significant relations. Now geom_smooth or stat_smooth adds trendlines for each group, but I want to specify which groups get a trendline and which don't.

Below an example of my script:

plot20<-ggplot(data, aes(x=data$Density, y=data$Total.degrees, color=Species, shape=Species)) 
+ geom_point(size=3) 
+ scale_shape_manual(values=shapeset) 
+ scale_colour_manual(values=colorset) 
+ theme(legend.position="none") 
+ geom_smooth(method=lm, se=FALSE)
Didzis Elferts
  • 95,661
  • 14
  • 264
  • 201
user2170248
  • 63
  • 1
  • 1
  • 5

1 Answers1

14

One solution would be to put subset() of your data inside geom_smooth() and give value for which you need to plot trendline.

As example used data mtcars (as sample data were not provided). With subset() cyl values of 4 or 6 are selected. Insede geom_smooth() also aes() should be repeated. 

ggplot(mtcars,aes(wt,mpg,color=factor(cyl)))+geom_point()+
    geom_smooth(data=subset(mtcars,cyl==4 | cyl==6),
               aes(wt,mpg,color=factor(cyl)),method=lm,se=FALSE)

enter image description here

Didzis Elferts
  • 95,661
  • 14
  • 264
  • 201