Create pred.r