# NOT RUN {
data(pondfrog1)
mod1 <- glm(frog ~ ph + waterdepth + temp, data=pondfrog1, family=poisson)
mod2 <- glm(frog ~ + waterdepth + temp, data=pondfrog1, family=poisson)
mod3 <- glm(frog ~ ph + + temp, data=pondfrog1, family=poisson)
mod4 <- glm(frog ~ ph + waterdepth , data=pondfrog1, family=poisson)
WAIC(mod1)
WAIC(mod2)
WAIC(mod3)
WAIC(mod4)
# }
Run the code above in your browser using DataLab