An R Companion to Applied Regression