R/psi.R

Defines functions psi

psi <-
function(a, f, mn, y, d0, wt) {
  0.5 * t(a) %*% (f - mn) - sum(wt * d0(f, y))
}

Try the GRaF package in your browser

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

GRaF documentation built on May 29, 2017, 9:50 a.m.