Предупреждающее сообщение, относящееся к ковариатам сайта при создании немаркированного кадра занятости

Я получаю предупреждающее сообщение "некоторые наблюдения были отклонены, поскольку соответствующие ковариаты отсутствовали" с приведенным ниже кодом. Я не получил того же предупреждения, когда запустил следующий код с меньшим набором данных.

Я не знаю, как я должен предоставить фиктивный набор данных, используя этот формат, но; Ковариаты моего сайта отформатированы в столбцы с тем же количеством строк, что и матрица обнаружения. Для моих ковариат наблюдений они отформатированы таким образом, что, например, при наблюдениях Тандуре, сетки Тандуре равны 1, Салук - 0, а остальные - NA.

Связано ли предупреждающее сообщение с синтаксисом? Или это какая-то ошибка другого рода. Кроме того, проблема, похоже, мешает моей способности позже строить графики с помощью модели. Ранее я задал вопрос, касающийся эстетики, и после устранения синтаксической ошибки получаю это сообщение об ошибке.

Ошибка: эстетика должна быть либо длиной 1, либо такой же, как данные (111): x

Тот же самый код работает при создании графика с меньшим набором данных. Это заставляет меня думать, что это причина этой более поздней ошибки. Я полагаю, что отказ от наблюдений в результате отсутствия соответствующих ковариат приводит к несоответствию эстетики и данных при построении графика.

Я застрял в вещах, если честно. Я предполагаю, что отсутствие соответствующих ковариат означает, что R не видит ковариаты сайта, соответствующие конкретным наблюдениям. Но как это может быть, если между файлами ковариат сайта и наблюдений одинаковое количество строк, каждая из которых представляет одну и ту же сетку.

WolvesModel <- unmarkedFrameOccu(y=WolfDetMatA, siteCovs=Site.Covs.Wolves1,
                                 obsCovs=list(site.SAL=site.SAL[,c("occ_1","occ_2", "occ_3","occ_4","occ_5", "occ_6", "occ_7", "occ_8","occ_9","occ_10","occ_11","occ_12","occ_13","occ_14")],
                                              site.TAN=site.TAN[,c("occ_1","occ_2", "occ_3","occ_4","occ_5", "occ_6", "occ_7", "occ_8","occ_9","occ_10","occ_11","occ_12","occ_13","occ_14")],
                                              EFF=EFF[,c("occ_1","occ_2", "occ_3","occ_4","occ_5", "occ_6", "occ_7", "occ_8","occ_9","occ_10","occ_11","occ_12","occ_13","occ_14")]))


m<-occu(~1~1, data=WolvesModel)
m

> m.site2<-occu(~ site.SAL + site.TAN + EFF ~ 1, data=WolvesModel)
Warning message:
Some observations have been discarded because corresponding covariates were missing. 
> m.VIL2<-occu(~ site.SAL + site.TAN + EFF ~ Vill_Dist, data=WolvesModel)       
Warning message:
Some observations have been discarded because corresponding covariates were missing. 
> m.RAN2<-occu(~ site.SAL + site.TAN + EFF ~ Rang_Dist, data=WolvesModel)       
Warning message:
Some observations have been discarded because corresponding covariates were missing. 
> m.LEP2<-occu(~ site.SAL + site.TAN + EFF ~ Lep_Det, data=WolvesModel)
Warning message:
Some observations have been discarded because corresponding covariates were missing. 
> m.PRO2<-occu(~ site.SAL + site.TAN + EFF ~ Prot_Stat, data = WolvesModel)
Warning message:
Some observations have been discarded because corresponding covariates were missing. 


The expected is to be able to produce a graph because the dataset/aesthetics match. 
I believe this warning message/an issue with the site covariates mapping onto the detection matrix and/or the observation covariates is the route of the issue.

0 ответов

Другие вопросы по тегам