translogEst {micEcon}R Documentation

Estimate a translog function

Description

Estimate a translog function.

Usage

   translogEst( yName, xNames, data, shifterNames = NULL,
      quadHalf = TRUE, dataLogged = FALSE, ... )

   ## S3 method for class 'translogEst':
   print( x, ... )

Arguments

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.

Value

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.

Author(s)

Arne Henningsen

See Also

translogCalc, translogDeriv and quadFuncEst.

Examples

   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 )

[Package micEcon version 0.5-14 Index]