R/psi.R

Defines functions psi

psi <- function(x, eta.f, eta.s, theta.f, theta.s)
{
    temp <- (eta.f(x, theta.f) - eta.s(x, theta.s))
    temp * temp
}

Try the rodd package in your browser

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

rodd documentation built on May 29, 2017, 9:42 p.m.