Update predictions.R