Kmenta | R Documentation |
These are partly contrived data from Kmenta (1986), constructed to illustrate estimation of a simultaneous-equation model.
data("Kmenta")
This data frame contains 20 annual observations of 5 variables:
food consumption per capita.
ratio of food prices to general consumer prices.
disposable income in constant dollars.
ratio of preceding year's prices received by farmers to general consumer prices.
time trend in years.
The exogenous variables income
, farmPrice
,
and trend
are based on real data;
the endogenous variables price
and consump
were generated by simulation.
Kmenta (1986), Table 13-1, p. 687.
Kmenta, J. (1986). Elements of Econometrics, Second Edition, Macmillan, New York.
## Replicating the estimations in Kmenta (1986), p. 712, Tab 13-2
data( "Kmenta" )
eqDemand <- consump ~ price + income
eqSupply <- consump ~ price + farmPrice + trend
inst <- ~ income + farmPrice + trend
system <- list( demand = eqDemand, supply = eqSupply )
## OLS estimation
fitOls <- systemfit( system, data = Kmenta )
summary( fitOls )
## 2SLS estimation
fit2sls <- systemfit( system, "2SLS", inst = inst, data = Kmenta )
summary( fit2sls )
## 3SLS estimation
fit3sls <- systemfit( system, "3SLS", inst = inst, data = Kmenta )
summary( fit3sls )
## I3LS estimation
fitI3sls <- systemfit( system, "3SLS", inst = inst, data = Kmenta,
maxit = 250 )
summary( fitI3sls )
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.