Create regression.R