thank you for this advice! Before buying books, I would like to be sure that there is a solution for my problem to be found.
formula <- y ~ treatment*season +
f(spatial.field2, model = spde.pc) +
f(start,model = "rw2") +
f(individual,model = "iid") +
f(treatment_n,model = "rw2")
Mod <- inla(formula,
data = inla.stack.data(Stack, spde=spde.pc),
family = "lognormal",
control.compute = list(cpo = TRUE, config = TRUE),
control.predictor = list(A = inla.stack.A(Stack),
compute = T))
What I would like to get is the means with CrI's like shown below. To get an impression I calculated them out of group means of the dataset from fitted values (e.g. fit<-aggregate(mean ~ treatment + season, data = bar_dist, FUN= "mean" ).
Thanks!
Ramona