R/LOOCV.R

# LOOCV

LOOCV <- function(dat, offset=1952) {
  Model <- glm(lifeExp ~ I(year-1952), family=gaussian, dat)
  MSE <- cv.glm(dat, Model)$delta[1]
}
zliu392/Package627 documentation built on May 4, 2019, 11:24 p.m.