data(efc)
cv(efc$e17age)
fit <- lm(neg_c_7 ~ e42dep, data = efc)
cv(fit)
library(lme4)
fit <- lmer(Reaction ~ Days + (Days | Subject), sleepstudy)
cv(fit)
library(nlme)
fit <- lme(distance ~ age, data = Orthodont)
cv(fit)
Run the code above in your browser using DataLab