@shadowtalkerの回答に加えて、パッケージglmnetを使用していたときに、相互検証の逸脱がどういうわけか正規化されているように感じます。
library(glmnet)
data(BinomialExample)
fit = cv.glmnet(x,y, family = c("binomial"), intercept = FALSE)
head(fit$cvm) # deviance from test samples at lambda value
# >[1] 1.383916 1.359782 1.324954 1.289653 1.255509 1.223706
# deviance from (test samples? all samples?) at lambda value
head(deviance(fit$glmnet.fit))
# >[1] 138.6294 134.5861 131.1912 127.1832 122.8676 119.1637
Ref:逸脱Rドキュメント
除算すると
head(deviance(fit$glmnet.fit)) / length(y))
結果は
[1] 1.386294 1.345861 1.311912 1.271832 1.228676 1.191637
これは、fit $ cvmに非常に近いものです。
これは、@ Hong Ooiからのコメントがこの質問について言ったことかもしれません:
/programming/43468665/poisson-deviance-glmnet
glm
(または、少なくともそうでなければなりません-私が認識している逸脱度の定義は1つしかありません)。