Create Multivariable Regression.R