Removed commented out functions. Converting this into RAD only function with lm() output. Will rename sad_rad(), sad_beta() will become second exported function.