USMeatConsump {micEcon} | R Documentation |
The USMeatConsump
data set contains quarterly retail prices
and consumption quantities for four meat product categories:
beef, pork, chicken, and turkey.
The data period ranges from the first quarter of 1975
to the third quarter of 1999.
Hence, there are 99 observations.
data(USMeatConsump)
This data frame contains the following columns:
SAS, SAS/ETS Examples: Estimating an Almost Ideal Demand System Model, http://support.sas.com/rnd/app/examples/ets/aids/index.htm.
## replicating the LA-AIDS estimation of the SAS example # loading data set data( USMeatConsump ) # adding shifter variables for modeling seasonal effects USMeatConsump$co1 <- cos( 1 / 2 * 3.14159 * USMeatConsump$t ) USMeatConsump$si1 <- sin( 1 / 2 * 3.14159 * USMeatConsump$t ) # Scaling prices by their means USMeatConsump$beef_pm <- USMeatConsump$beef_p / mean( USMeatConsump$beef_p ) USMeatConsump$pork_pm <- USMeatConsump$pork_p / mean( USMeatConsump$pork_p ) USMeatConsump$chick_pm <- USMeatConsump$chick_p / mean( USMeatConsump$chick_p ) USMeatConsump$turkey_pm <- USMeatConsump$turkey_p / mean( USMeatConsump$turkey_p ) # Estimation of the model meatModel <- aidsEst( c( "beef_pm", "pork_pm", "chick_pm", "turkey_pm" ), c( "beef_w", "pork_w", "chick_w", "turkey_w" ), "meat_exp", shifterNames = c( "co1", "si1", "t" ), priceIndex ="S", data = USMeatConsump, maxiter=1000 ) summary( meatModel )