Estimator of small tail probability 1−Fi(q) in the regression case where γ is constant and the regression modelling is thus only solely placed on the scale parameter.
ProbReg(Z, A, q, plot =FALSE, add =FALSE, main ="Estimates of small exceedance probability",...)
Arguments
Z: Vector of n observations (from the response variable).
A: Vector of n−1 estimates for A(i/n) obtained from ScaleReg.
q: The used large quantile (we estimate P(Xi>q)) for q large).
plot: Logical indicating if the estimates should be plotted as a function of k, default is FALSE.
add: Logical indicating if the estimates should be added to an existing plot, default is FALSE.
main: Title for the plot, default is "Estimates of small exceedance probability".
...: Additional arguments for the plot function, see plot for more details.
Details
The estimator is defined as
1−F^i(q)=A^(i/n)(k+1)/(n+1)(q/Zn−k,n)−1/Hk,n,
with Hk,n the Hill estimator. Here, it is assumed that we have equidistant covariates xi=i/n.
See Section 4.4.1 in Albrecher et al. (2017) for more details.
Returns
A list with following components: - k: Vector of the values of the tail parameter k.
P: Vector of the corresponding probability estimates.
q: The used large quantile.
References
Albrecher, H., Beirlant, J. and Teugels, J. (2017). Reinsurance: Actuarial and Statistical Aspects, Wiley, Chichester.
Author(s)
Tom Reynkens.
See Also
QuantReg, ScaleReg, Prob
Examples
data(norwegianfire)Z <- norwegianfire$size[norwegianfire$year==76]i <-100n <- length(Z)# Scale estimator in i/nA <- ScaleReg(i/n, Z, h=0.5, kernel ="epanechnikov")$A
# Small exceedance probabilityq <-10^6ProbReg(Z, A, q, plot=TRUE)# Large quantilep <-10^(-5)QuantReg(Z, A, p, plot=TRUE)