R/z.pr.u.R

Defines functions z.pr.u

Documented in z.pr.u

z.pr.u = function(z, hk, mu, sigma, ph, H, n){
    sigma = sigma[hk]
    mu = mu[hk]

    out <- .Call("stick_multnorm_z", z, ph, sigma, mu, n, H, PACKAGE="BHTSpack")
    return(matrix(out, sum(n), H, byrow=TRUE))
}

Try the BHTSpack package in your browser

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

BHTSpack documentation built on Feb. 8, 2021, 5:07 p.m.