
aidsConcav( priceNames, totExpName, coef, data, shareNames = NULL )## S3 method for class 'aidsConcav':
print( x, header = TRUE, \dots )
aidsConcav
.aidsConcav
returns a list of class aidsConcav
that contains following elements:shareNames
is specified,
observed shares are used for the calculation of the 'C' matrices
to check for concavity;
if argument shareNames
is NULL
(e.g., not specified),
fitted shares are used for the calculation of the 'C' matrices.Please note that checking concavity of the expenditure function requires that the expenditure function of the model exists. Therefore, the concavity condition can be checked, only if the symmetry condition is fulfilled and the translog price index is used.
Deaton, A.S. and J. Muellbauer (1980b) Economics and Consumer Behavior, Cambridge University Press, Cambridge.
aidsEst
, aidsElas
data( Blanciforti86 )
# Data on food consumption are available only for the first 32 years
Blanciforti86 <- Blanciforti86[ 1:32, ]
priceNames <- c( "pFood1", "pFood2", "pFood3", "pFood4" )
shareNames <- c( "wFood1", "wFood2", "wFood3", "wFood4" )
# estimate the AIDS
estResult <- aidsEst( priceNames, shareNames, "xFood",
data = Blanciforti86, method = "IL" )
# check concavity with fitted shares
aidsConcav( priceNames, "xFood", coef = estResult$coef,
data = Blanciforti86 )
# check concavity with observed shares
aidsConcav( priceNames, "xFood", coef = estResult$coef,
data = Blanciforti86, shareNames = shareNames )
Run the code above in your browser using DataLab