# \donttest{
simdat <- sim_mvgam()
mod <- mvgam(y ~ s(season) +
s(time, by = series),
family = poisson(),
data = simdat$data_train,
run_model = FALSE)
# View Stan model code
stancode(mod)
# View Stan model data
sdata <- standata(mod)
str(sdata)
# }
Run the code above in your browser using DataLab