LRGumbel.test(x,
alternative = c("frechet", "GEV"),
method = c("num", "sim", "asymp"),
nSamp = 1500,
simW = FALSE)method is
"sim".TRUE and method
is "sim", the simulated values are returned as
an element W in the list.statistic, p.value
and method. Other elements aresimW is TRUE and method is "sim"
only. A vector of nSamp simulated values of the statistic
$W := -2 \log \textrm{LR}$.
methodis"num", a numerical approximation
of the distribution is used.methodis"sim",nSampsamples of
the Gumbel distribution with the same size asxare drawn and
the LR statistic is computed for each sample. The$p$-value is
simply the estimated probability that a simulated LR is greater than
the observed LR. This method requires more computation time than
the tow others.methodis"asymp", the asymptotic
distribution is used.set.seed(1234)
x <- rgumbel(60)
res <- LRGumbel.test(x)Run the code above in your browser using DataLab