For-loop for multiple regressions

Question

I am learning R.

I need to run the same regression yt=bo + b1*X(with lag) for a 10 different X´s and save the b1 coefficients.

So far I have got this:

I