R/vcov.ssym.R

In ssym: Fitting Semi-Parametric log-Symmetric Regression Models

Defines functions vcov.ssym

Documented in vcov.ssym

vcov.ssym <-
function(object, ...){
if(object$censored==FALSE) list(mu=object$vcov.mu, phi=object$vcov.phi)
else list(mu=object$vcov.mu, phi=object$vcov.phi, cov.mu.phi=object$cov.mu.phi)}

Try the ssym package in your browser