Существует ли функция R для l oop для запуска регрессий линейной модели с каждым другим именем переменной в наборе данных панели?

Question

Я пытаюсь запустить функцию R для l oop с линейной регрессией модели для каждого 1 из 397 банков, каждый из которых имеет временные различия переменных стрижки соглашения репо в моем наборе данных панели ds_merged_2. Это код:

betas <- matrix(NA,nrow = 12,ncol = 397)
for(cur_bank in bank_list){
  ds_bank <- ds_merged_2 %>% filter(`company name` == cur_bank)
  reg_bank_panel <- lm(RiRf ~ RmRf + change_H1 + change_H2 + change_H3 + change_H4 + change_H5 +  
  change_H6 + change_H7 + change_H8 + change_H9 + change_reserves, data = ds_bank)
  betas[ ,which(cur_bank == bank_list)] <- coeftest(reg_bank_panel)[ ,1]
}

Я получаю сообщение об ошибке:

> betas <- matrix(NA,nrow = 12,ncol = 397)
> ds_bank <- ds_merged_2 %>% filter(`company name` == cur_bank)
> reg_bank_panel <- lm(RiRf ~ RmRf + change_H1 + change_H2 + change_H3 + change_H4 + change_H5 + 
change_H6 + change_H7 + change_H8 + change_H9 + change_reserves, data = ds_bank)
Error in lm.fit(x, y, offset = offset, singular.ok = singular.ok, ...) : 
 0 (non-NA) cases
> betas[ ,which(cur_bank == bank_list)] <- coeftest(reg_bank_panel)[ ,1]
Error in coeftest(reg_bank_panel) : object 'reg_bank_panel' not found

Пожалуйста, помогите. Спасибо.