Simple Scatterplot

# Simple Scatterplot

attach(mtcars)
plot(wt, mpg, main="Scatterplot Example", 
   xlab="Car Weight ", ylab="Miles Per Gallon ", pch=19)

# Add fit lines—添加回归线和lowess线

abline(lm(mpg~wt), col="red") # regression line (y~x) 
lines(lowess(wt,mpg), col="blue") # lowess line (x,y)

Scatterplots 散点图

原文：http://www.cnblogs.com/VictorBing-Blog/p/5275994.html