Koebel, B., M. Falk and F. Laisney (2000),
Imposing and Testing Curvature Conditions on a Box-Cox Cost Function.
Discussion Paper No. 00-70, ZEW, Mannheim,
ftp://ftp.zew.de/pub/zew-docs/dp/dp0070.pdf. Koebel, B., M. Falk and F. Laisney (2003),
Imposing and Testing Curvature Conditions on a Box-Cox Cost Function.
Journal of Business and Economic Statistics, 21, p. 319-335.
snqProfitEst
.
[object Object]
data( germanFarms )
germanFarms$qOutput <- germanFarms$vOutput / germanFarms$pOutput
germanFarms$qVarInput <- -germanFarms$vVarInput / germanFarms$pVarInput
germanFarms$qLabor <- -germanFarms$qLabor
germanFarms$time <- c( 0:19 )
pNames <- c( "pOutput", "pVarInput", "pLabor" )
qNames <- c( "qOutput", "qVarInput", "qLabor" )
fNames <- c( "land", "time" )
estResult <- snqProfitEst( pNames, qNames, fNames, data = germanFarms )
estResult # Note: it is NOT convex in netput prices
estResultConvex <- snqProfitImposeConvexity( estResult )
estResultConvex # now it is convex
models