Scatter Plots - R Graphics - page 149

points(x, y, pch = pch, col = col, bg = bg, cex = cex)
abline(stats::lm(y ~ x), col = col.smooth, ... )
}
This time the default line color is black instead of red, though you can change it here (and with
panel.smooth ) by setting col.smooth when you call pairs ().
We'll also use small points in the visualization, so that we can distinguish them a bit better ( Fig-
ure 5-38 ) . This is done by setting pch="." :
pairs(c2009[, 2 : 5 ], pch = "." ,
upper.panel = panel.cor,
diag.panel = panel.hist,
lower.panel = panel.lm)