How to estimate the simple linear regression equation in r