Update predict.Rnw