View source: R/snqProfitShadowPrices.R
snqProfitShadowPrices | R Documentation |
Calculates the shadow prices of a Symmetric Normalized Quadratic (SNQ) profit function.
snqProfitShadowPrices( priceNames, fixNames, estResult = NULL, data = estResult$data, weights = estResult$weights, scalingFactors = estResult$scalingFactors, coef = estResult$coef, form = estResult$form )
priceNames |
a vector of strings containing the names of netput prices. |
fixNames |
an optional vector of strings containing the names of the quantities of (quasi-)fix inputs. |
estResult |
object returned by |
data |
a data frame containing the data. |
weights |
vector of weights of prices used for normalization. |
scalingFactors |
factors to scale prices (see details). |
coef |
a list containing the coefficients (at least delta and gamma). |
form |
the functional form to be estimated (see details). |
Arne Henningsen
snqProfitEst
, snqProfitCalc
and
snqProfitEla
.
if( requireNamespace( 'micEcon', quietly = TRUE ) ) { data( germanFarms, package = "micEcon" ) germanFarms$qOutput <- germanFarms$vOutput / germanFarms$pOutput germanFarms$qVarInput <- -germanFarms$vVarInput / germanFarms$pVarInput germanFarms$qLabor <- -germanFarms$qLabor germanFarms$time <- c( 0:19 ) priceNames <- c( "pOutput", "pVarInput", "pLabor" ) quantNames <- c( "qOutput", "qVarInput", "qLabor" ) fixNames <- c( "land", "time" ) estResult <- snqProfitEst( priceNames, quantNames, fixNames, data = germanFarms ) snqProfitShadowPrices( priceNames, fixNames, estResult ) }
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.