library(MASS) data(hills) pairs(hills) attach(hills) plot(dist,time)
identify(dist,time,row.names(hills)) abline(lm(time~dist)) library(lqs)
abline(lm(time~dist),lty=3,col=4) detach()清除之前的数据
library(MASS) data(hills) pairs(hills) attach(hills) plot(dist,time)
identify(dist,time,row.names(hills)) abline(lm(time~dist)) library(lqs)
abline(lm(time~dist),lty=3,col=4) detach()清除之前的数据