Summary of the fitted values. Also returns the marginals of the fitted values if compute=TRUE in control.predictor of the inla object fit.

Summary of the fitted values. Also returns the marginals of the fitted values if compute=TRUE in control.predictor of the inla object fit.

Usage

# S4 method for ngvb.list
fitted(object)

Arguments

object

An ngvb.list object (output of ngvb function)

Examples

if (FALSE) {
 #Here we fit an RW1 latent process to the jumpts time series
 plot(jumpts)

 #Fit LGM with INLA
 LGM     <- inla(y ~ -1 + f(x,  model = "rw1"),
                 data = jumpts)

 #Fit LnGM with ngvb
 LnGM <- ngvb(fit = LGM, selection = list(x=1:100))

 #Available methods
 summary(LnGM)
 print(LnGM)
 plot(LnGM)
 fitted(LnGM)
 samples <- simulate(LnGM)
 }