trendline in R in ggplot

Question

mpg %>% 
  mutate(Color=ifelse(class==\'2seater\',\'2seater\',\'Other\')) %>% 
  ggplot(aes(displ, hwy, colour = Color)) + 
  geom_point() + 
  scale_color_man