Create rcalc.R