Create findBeta.R