R: Error looping through autoregression outputs

Question

I\'m trying to create an autoregression model for an already differenced time-series.

I\'d like to put the code below in a loop so it\'s not repetitive.