R/stepi3.R

Defines functions stepi3

Documented in stepi3

stepi3 <-
function(param){
    xp <- aperm(param$x, c(2, 3, 1))
    gp <- aperm(param$g, c(2, 3, 1))
    paramp <- list(a = param$b, b = param$cc, cc = param$a, g = gp, x = xp)
    newcomp3(paramp)
}

Try the CA3variants package in your browser

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

CA3variants documentation built on Oct. 10, 2022, 5:07 p.m.