Description Usage Arguments Value Author(s) See Also Examples
View source: R/translogCheckCurvature.R
Check curvature of a translog function.
| 1 2 3 4 5 | 
| xNames | a vector of strings containing the names of the independent variables. | 
| data | dataframe containing the data. | 
| coef | vector containing all coefficients. | 
| convexity | logical. Check whether the function is (quasi)convex
(default,  | 
| quasi | logical. Check whether the function is quasiconvex/quasiconcave
( | 
| dataLogged | logical. Are the values in  | 
| x | an object returned by  | 
| ... | arguments passed from  | 
translogCheckCurvature returns a list of class
translogCheckCurvature containing following objects:
| obs | a vector indicating whether the condition for the specified curvature is fulfilled at each observation. | 
| convexity | argument  | 
| quasi | argument  | 
Arne Henningsen
translogEst and translogCheckMono
| 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 |    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 translog production function
   estResult <- translogEst( "qOutput", c( "qLabor", "land", "qVarInput", "time" ),
      germanFarms )
   # check whether the production function is quasiconcave
   translogCheckCurvature( c( "qLabor", "land", "qVarInput", "time" ),
      germanFarms, coef( estResult ), convexity = FALSE, quasi = TRUE )
 | 
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.