| translogEst {micEcon} | R Documentation |
Estimate a translog function.
translogEst( yName, xNames, data, shifterNames = NULL,
quadHalf = TRUE, dataLogged = FALSE, ... )
## S3 method for class 'translogEst':
print( x, ... )
yName |
a string containing the name of the dependent variable. |
xNames |
a vector of strings containing the names of the independent variables. |
data |
data frame containing the data
(possibly a panel data frame created with
plm.data). |
shifterNames |
a vector of strings containing the names of the independent variables that should be included as shifters only (not in quadratic or interaction terms). |
quadHalf |
logical. Multiply the quadratic terms by one half? |
dataLogged |
logical. Are the values in data already logged?
If FALSE, the logarithms of all variables (yName,
xNames, shifterNames) are used except for
shifter variables that are factors or logical variables. |
x |
An object of class translogEst. |
... |
further arguments of translogEst
are passed to lm
or plm;
further arguments of print.translogEst
are currently ignored. |
a list of class translogEst containing following objects:
est |
the object returned by lm
or plm. |
nExog |
length of argument xNames. |
nShifter |
length of argument shifterNames. |
residuals |
residuals. |
fitted |
fitted values. |
coef |
vector of all coefficients. |
coefCov |
covariance matrix of all coefficients. |
r2 |
R^2 value. |
r2bar |
adjusted R^2 value. |
nObs |
number of observations. |
model.matrix |
the model matrix. |
call |
the matched call. |
yName |
argument yName. |
xNames |
argument xNames. |
shifterNames |
argument shifterNames. |
quadHalf |
argument quadHalf. |
dataLogged |
argument dataLogged. |
Arne Henningsen
translogCalc, translogDeriv
and quadFuncEst.
data( germanFarms )
# output quantity:
germanFarms$qOutput <- germanFarms$vOutput / germanFarms$pOutput
# quantity of variable inputs
germanFarms$qVarInput <- germanFarms$vVarInput / germanFarms$pVarInput
# a time trend to account for technical progress:
germanFarms$time <- c(1:20)
# estimate a quadratic production function
estResult <- translogEst( "qOutput", c( "qLabor", "land", "qVarInput", "time" ),
germanFarms )
estResult
summary( estResult )