rho_pwm {npbr} | R Documentation |
Probability-weighted moment frontier estimator
Description
This function is an implementation of the Probability-weighted moment frontier estimator developed by Daouia, Florens and Simar (2012).
Usage
rho_pwm(xtab, ytab, x, a=2, lrho=1, urho=Inf)
Arguments
xtab |
a numeric vector containing the observed inputs |
ytab |
a numeric vector of the same length as |
x |
a numeric vector of evaluation points in which the estimator is to be computed. |
a |
a smoothing parameter (integer) larger than or equal to 2. |
lrho |
a scalar, minimum rho threshold value. |
urho |
a scalar, maximum rho threshold value. |
Details
The function computes the probability-weighted moment (PWM) estimator \bar\rho_x
utilized in the frontier estimate
\tilde\varphi_{pwm}(x)
[see dfs_pwm
].
This estimator depends on the smoothing parameters a
and m
. A simple selection rule of thumb that Daouia et al. (2012) have employed is
a=2
[default option in the 4th argument of the function]
and m=coefm \times N^{1/3}_x
, where N_x=\sum_{i=1}^n1_{\{x_i\le x\}}
and the integer coefm
is to be tuned by the user.
To choose this parameter in an optimal way for each x
, we adapt the automated threshold selection method of Daouia et al. (2010) as follows:
We first evaluate the estimator \bar\rho_x
over a grid of values of coefm
given by
c = 1, \cdots, 150
.
Then, we select the c
where the variation of the results is the smallest. This is achieved by computing the standard deviation of the estimates \bar\rho_x
over a “window” of
\max([\sqrt{150}],3)
successive values of c
. The value of c
where this standard deviation is minimal defines the value of coefm
.
The user can also appreciably improve the estimation of the extreme-value index \rho_x
and the frontier function \varphi_x
itself by tuning the choice of the lower limit
(default option lrho=1
) and upper limit (default option urho=Inf
).
Value
Returns a numeric vector with the same length as x
.
Note
The computational burden here is demanding, so be forewarned.
Author(s)
Abdelaati Daouia and Thibault Laurent.
References
Daouia, A., Florens, J.-P. and Simar, L. (2010). Frontier estimation and extreme value theory. Bernoulli, 16, 1039-1063.
Daouia, A., Florens, J.-P. and Simar, L. (2012). Regularization of Nonparametric Frontier Estimators. Journal of Econometrics, 168, 285-299.
See Also
Examples
data("post")
x.post<- seq(post$xinput[100],max(post$xinput),
length.out=100)
## Not run:
# When rho[x] is unknown and dependent of x,
# its estimate hat(rho[x]) is obtained via:
rho_pwm <- rho_pwm(post$xinput, post$yprod, x.post, a=20)
## End(Not run)