R/gcv.loss.R

Defines functions gcv.loss

Documented in gcv.loss

gcv.loss <-
function (pred.obj)
{
   dev <- pred.obj$deviance
   tr.H <- pred.obj$tr.H
   nobs <- pred.obj$n.newobs

   nobs * dev / ((nobs - tr.H)^2)
}

Try the lqa package in your browser

Any scripts or data that you put into this service are public.

lqa documentation built on May 30, 2017, 3:41 a.m.