R/holdout.Mean.lm.R

`holdout.Mean.lm` <-
function(object, test.Frame, test.Vector, ...){
    tmp <- predict(object, newdata = test.Frame) - test.Vector
    mean(abs(tmp)) 
}

Try the CombMSC package in your browser

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

CombMSC documentation built on May 2, 2019, 2:32 p.m.