translogEst function

Estimate a translog function

Estimate a translog function.

translogEst( yName, xNames, data, shifterNames = NULL,
      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 pdata.frame).

• 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).

• 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.

Returns

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.

• dataLogged: argument dataLogged.

See Also

translogCalc, translogDeriv

and quadFuncEst.

Author(s)

Arne Henningsen

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 )