ggplot add regression line and r2