In [ ]:
library(ggplot2)
qplot(wt, mpg, data=mtcars, geom=c('point', 'smooth'), color=cyl, main='Regression of MPG on Weight', xlab='Weight', ylab='Miles per Gallon');

In [ ]: