Lab6 Regression.R