R/hp.nqx.R

Defines functions hp.nqx

Documented in hp.nqx

hp.nqx <-
function(H.out, age = seq(0, 85, 1)) 
{
    H.new.hat <- matrix(NA, nrow = nrow(H.out), ncol = length(age))
    for (i in 1:nrow(H.out)) {
        H.new.hat[i, ] <- mod8p(theta = H.out[i, ], x = age)
    }
    ans <- H.new.hat
    return(ans)
}

Try the HPbayes package in your browser

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

HPbayes documentation built on May 2, 2019, 5:53 a.m.