Create predict_global.R