devianceGamma: Function to calculate deviance for model predictions assuming...

In EdwinGraham/EdNet: Train deep neural networks for classification and regression

Description

This function calculates a deviance measure for model predictions assuming a Gamma distribution.

Usage

devianceGamma(Y, Y_hat)

Arguments

Y	a numeric vector of observations.
Y_hat	a numeric vector of predictions for Y (must have same length as Y.)

Value

a numeric vector.

Author(s)

Edwin Graham <[e-mail]>

Examples

# n <- 1000
# 
# true <- runif(n, 100, 2000)
# observed <- rgamma(n, true)
# predicted <- exp(log(1050)/2 + log(true)/2 + rnorm(n, sd=0.3))
# 
# plot(observed, predicted)
# 
# devs <- devianceGamma(observed, predicted)
# sum(devs)

EdwinGraham/EdNet documentation built on May 6, 2019, 12:22 p.m.