Пакет MuMin - Dredge of Model все еще работает 15 часов спустя - PullRequest
Новая
       30

Пакет MuMin - Dredge of Model все еще работает 15 часов спустя

0 голосов
/ 17 декабря 2018

Я использую земснаряд модели линейного смешанного эффекта в пакете MuMin в R, модель довольно большая (см. Ниже) 

>     Monster <- lmer(Fw.FratioFall ~ Average_mintemp_winter + (Average_mintemp_winter^2)
>                     + percentage_woody_coverage + (percentage_woody_coverage^2)
>                     + kmRoads.km2 + (kmRoads.km2^2) + Fracking 
>                     + WELLS_ACTIVED + (WELLS_ACTIVED^2) + BadlandsCoyote.1000_mi
>                     + (BadlandsCoyote.1000_mi^2) + cougar_presence + COYOTE_springsurveys
>                     + (COYOTE_springsurveys^2) + d3.1 + (d3.1^2) + WT_DEER_springsurveys
>                     + (WT_DEER_springsurveys^2) + WT_DEER_fallsurveys + (WT_DEER_fallsurveys^2) 
>                     + ELK_springsurveys + (ELK_springsurveys^2) + ELK_fallsurveys + (ELK_fallsurveys^2)     
>                     + (BadlandsCoyote.1000_mi*WELLS_ACTIVED) + (BadlandsCoyote.1000_mi*d3.1) 
>                     + (BadlandsCoyote.1000_mi*WELLS_ACTIVED*d3.1) 
>                     + (cougar_presence*percentage_woody_coverage) 
>                     + (COYOTE_springsurveys*WELLS_ACTIVED) 
>                     + (percentage_woody_coverage*cougar_presence*COYOTE_springsurveys)
>                     + (Average_mintemp_winter*COYOTE_springsurveys) 
>                     + (Average_mintemp_winter*BadlandsCoyote.1000_mi)
>                     + year + (1 | YEAR) + (year | StudyArea),  REML = F, data = mydata)

функция Dredge работает уже 15 часов напроцессор i7, и мне интересно, нормально ли это, какие временные рамки мне следует ожидать для модели такого размера?

Я проверил журналы и R не рухнул, драга все еще работает (этопроизводство моделей "единственного соответствия" в изобилии) 

singular fit
singular fit
singular fit
singular fit
singular fit
singular fit

Я протестировал меньшую модель, и функция драгирования заняла примерно минуту

Меньшая модель 

> sample <- lmer(Fw.FratioFall ~ Average_mintemp_winter +
> (Average_mintemp_winter^2)  + year + (1 | YEAR) + (year | StudyArea), 
> REML = F, data = mydata)

Может кто угодноПосоветуйте временные рамки для модельного экскаватора с пакетом MuMin.Спасибо.

...