added IntroLinearModels.R 1 and 2