R/hubermean_if.R

In scoringfunctions: A Collection of Loss Functions for Assessing Point Forecasts

Defines functions hubermean_if

Documented in hubermean_if

hubermean_if <- function(x, y, a)
{
    (capping_function(t = x - y, a = a, b = a))/2
}

Try the scoringfunctions package in your browser