add trendline to scatter plot in r