pp(x, ci = TRUE, main = "Quantile Plot", xlab = "Model",
ylab = "Empirical", ...)
"evd"
.TRUE
(the default), plot simulated
95% confidence intervals.Let $y_t = -1/\log(1 - 1/t)$. It follows that $$z_t = a + b(y_t^s - 1)/s.$$ When $s = 0$, $z_t$ is defined by continuity, so that $$z_t = a + b\log(y_t).$$ The curve within the return level plot is $z_t$ plotted against $y_t$ on a logarithmic scale, using maximum likelihood estimates of $(a,b,s)$. If the estimator of $s$ is zero, the curve will be linear. For large values of $t$, $y_t$ is approximately equal to $t$.
The points on the plot are
$${(-1/\log(p_i), z_i), i = 1,\ldots,m}$$
where $p_1,\ldots,p_m$ are plotting points defined by
ppoints
, and $z_1,\ldots,z_m$ are the data
used in the fitted model, sorted into ascending order.
For a good fit the points should lie ``close'' to the curve
defined by $(z_t,\log(y_t))$.
For non-stationary models the data are transformed to stationarity. The plot then corresponds to the distribution obtained when all covariates are zero.
dens
, plot.evd
,
ppoints
, pp
, qq
uvdata <- rgev(100, loc = 0.13, scale = 1.1, shape = 0.2)
M1 <- fgev(uvdata)
rl(M1)
Run the code above in your browser using DataLab