R/tpopt.R

Defines functions tpopt

Documented in tpopt

tpopt <-  function(x, w = rep(1, length(x)) / length(x), eta, theta.fix, theta.var = NULL, p, x.lb = min(x), x.rb = max(x), opt = list())
{
    result <- topt(x, w, eta, theta.fix, theta.var, p, x.lb, x.rb, opt)
    class(result) <- "tpopt"
    result$call <- match.call()
    result
}

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.