R/fitted.aidsEst.R

In micEconAids: Demand Analysis with the Almost Ideal Demand System (AIDS)

Defines functions fitted.aidsEst

Documented in fitted.aidsEst

fitted.aidsEst <- function( object, ... ) {
   result <- list()
   result$shares <- object$wFitted
   result$quant  <- object$qFitted
   return( result )
}

Try the micEconAids package in your browser