Multiple linear model prediction in dplyr

Question

I\'m trying to generate predictions for multiple models at the same time using dplyr using the script below. Unfortunately this is resulting in duplicated data that do not r