Update calibrate.R