R/vcov.cesEst.R

vcov.cesEst <- function( object, ... ){

   if( !is.null( object$vcov ) ) {
      return( object$vcov )
   } else {
      return( summary( object )$vcov )
   }
}

Try the micEconCES package in your browser

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

micEconCES documentation built on May 2, 2019, 4:41 p.m.