R/vcov.cusp.R

`vcov.cusp` <-
function (object, ...) 
{
    so <- summary.cusp(object, correlation = FALSE, logist = FALSE, 
        ...)
    so$dispersion * so$cov.unscaled
}

Try the cusp package in your browser

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

cusp documentation built on May 2, 2019, 6:51 p.m.