Я пытаюсь предсказать значения во времени (дни по оси x) для модели блеска, которая была запущена на моих биномиальных данных. Total Alive и Total Dead являются данными подсчета. Это моя модель, и соответствующие шаги ниже.

full.model.dredge<-glmer(cbind(Total.Alive,Total.Dead)~(CO2.Treatment+Lime.Treatment+Day)^3+(Day|Container)+(1|index),
                         data=Survival.data,family="binomial")

Мы учли избыточную дисперсию, как вы можете видеть в коде (1: индекс).

Затем мы используем команду dredge, чтобы определить наиболее подходящие модели с основными эффектами (CO2.Treatment, Lime.Treatment, Day) и их соответствующими взаимодействиями.

dredge.models<-dredge(full.model.dredge,trace=FALSE,rank="AICc")

Затем сделал переменную рабочей области для них

my.dredge.models<-get.models(dredge.models)

Затем мы провели модельное среднее значение для усреднения коэффициентов для моделей наилучшего соответствия

silly<-model.avg(my.dredge.models,subset=delta<10)

Но теперь я хочу создать график с Total Alive по оси Y и Days по оси X, а также с подогнанной линией в зависимости от выходных данных модели. Я понимаю, что это сложно, потому что модель объединила Total.Alive и Total.Dead (см.cbind(Total.Alive,Total.Dead) в модели.

Когда я пытаюсь запустить команду предсказания, я получаю ошибку

# 9: In UseMethod("predict") :
#   no applicable method for 'predict' applied to an object of class "mer"