translogHessian {micEcon}R Documentation

Hessian matrix of a translog function

Description

Calculate the Hessian matrices of a translog function.

Usage

   translogHessian( xNames, data, allCoef, quadHalf = TRUE,
   logValues = FALSE, bordered = FALSE )

Arguments

xNames a vector of strings containing the names of the independent variables.
data dataframe containing the data.
allCoef vector containing all coefficients.
quadHalf logical. Multiply the quadratic terms by one half?
logValues logical. Are the values in data already logged?
bordered logical. Should the bordered Hessians be returned?

Value

a list containing following the (bordered) Hessian matrices at each data point.

Author(s)

Arne Henningsen ahenningsen@agric-econ.uni-kiel.de

See Also

translogEst, translogDeriv and translogCalc

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 )

   # compute the Hessian matrices
   hessians <- translogHessian( c( "qLabor", "land", "qVarInput", "time" ),
      germanFarms, estResult$allCoef )
   hessians[[ 1 ]]

   # compute the bordered Hessian matrices
   borderedHessians <- translogHessian( c( "qLabor", "land", "qVarInput", "time" ),
      germanFarms, estResult$allCoef, bordered = TRUE )
   borderedHessians[[ 1 ]]

[Package micEcon version 0.1-3 Index]