R/minK1.r

minK1 <- function(g, w, n){
    r1 <- BoundedIsoMean(g[1:n], w[1:n])
    r2 <- g[(n + 1):(2 * n)]
    res <- c(r1, r2)
    return(res)
    }

Try the OrdMonReg package in your browser

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

OrdMonReg documentation built on May 2, 2019, 1:45 p.m.