Запуск факторного анализа с использованием функции разделения в R

У меня есть следующий набор данных:

MKT econ_unemp  econ_gas open
504 0.0743088   3.461    38
504 0.0740673   3.448    38
504 0.0740673   3.455    38
504 0.0740673   3.42     38
504 0.072682    3.391    38
505 0.0692244   3.345    38
505 0.0692244   3.381    38
505 0.0692244   3.484    38
505 0.0692244   3.488    38

Мне нужно провести факторный анализ трех переменных по рынку, поэтому я использовал функцию разделения в R, чтобы разделить данные:

  splitx<-split(data,data$DMA)

а затем попытался запустить факторный анализ следующим образом:

for (i in 1:length(splitx)) {

 fa <- factanal(splitx[[i]],factors =1)
  }

Но я получаю следующую ошибку:

Error in optim(start, FAfn, FAgr, method = "L-BFGS-B", lower = lower,:non-finite value supplied by optim

Надеюсь, предоставленной информации достаточно. Может ли кто-нибудь помочь мне исправить это.

С Уважением