Для L oop с фильтрацией и последующей регрессией в R

Question

Я попытался закодировать «для l oop», который фильтрует значения в столбце, а затем выполняет линейную модель для каждой итерации.

Что я сделал не так?

x <- c(1,2,3,4)

for (temp_var in x){
 filter(vek,store_id == x)
  {lmtest <- lm(UNITS ~ store_id,
                           data = vek  )   }}

Answer 1

отдельное спасибо @qdread, благодаря вашим комментариям я смог это исправить:

x <- c(1,2,3,4)
sink("D:\\test.txt")
for (temp_var in x){
y <- filter(vek,store_id == temp_var)
lmtest <- lm(UNITS ~ store_id,
             data = y             )  

print(summary(lmtest))

  }
sink()