How To Fit Linear Model In R