Adding a regression line on a ggplot Adding a regression line on a ggplot r r