Create calibrate.R