循环回归条件以删除特定系数

Question

所以我理解如何进行逐步回归，例如：

fit <- step(lm(y~x, data=df)

有没有办法创建一个可以按如下方式工作的循环：

1) stepwise regression - call it "fit"
2) re-run stepwise regression excluding coefficients > 1,000 from "fit"
3) continue process until all coefficients are <= 1,000

谢谢