在R中的循环中调用多个模型名称

I am having a hard time trying to create residual plots for multiple models in a loop. I used a loop to create the models:I am having a hard time trying to create residu