Create predictor.R