Update mc.calc.R