Aggiungere la retta di regressione per grafico a dispersione in r ggplot2

r ggplot retta di regressione

ggplot(data,aes(x.plot, y.plot)) +
  stat_summary(fun.data=mean_cl_normal) + 
  geom_smooth(method='lm', formula= y~x)