Linear Model Function In R Examples