R Under development (unstable) (2024-10-16 r87241 ucrt) -- "Unsuffered Consequences" Copyright (C) 2024 The R Foundation for Statistical Computing Platform: x86_64-w64-mingw32/x64 R is free software and comes with ABSOLUTELY NO WARRANTY. You are welcome to redistribute it under certain conditions. Type 'license()' or 'licence()' for distribution details. R is a collaborative project with many contributors. Type 'contributors()' for more information and 'citation()' on how to cite R or R packages in publications. Type 'demo()' for some demos, 'help()' for on-line help, or 'help.start()' for an HTML browser interface to help. Type 'q()' to quit R. > library(POT) > set.seed(123) > > x <- rgpd(30, 0, 1, 0.2) > f1 <- fitgpd(x, 0, "med") > convassess(f1) Warning message: In sqrt(diag(var.cov)) : NaNs produced > str(f1) List of 21 $ fitted.values : Named num [1:2] 0.708 0.42 ..- attr(*, "names")= chr [1:2] "scale" "shape" $ std.err : NULL $ std.err.type : NULL $ var.cov : NULL $ fixed : NULL $ param : Named num [1:2] 0.708 0.42 ..- attr(*, "names")= chr [1:2] "scale" "shape" $ deviance : NULL $ corr : NULL $ convergence : chr "successful" $ counts : Named num 44 ..- attr(*, "names")= chr "function" $ message : NULL $ threshold : num [1:30] 0 0 0 0 0 0 0 0 0 0 ... $ nat : int 30 $ pat : num 1 $ data : num [1:30] 1.4153 0.2436 0.979 0.126 0.0618 ... $ exceed : num [1:30] 1.4153 0.2436 0.979 0.126 0.0618 ... $ scale : Named num 0.708 ..- attr(*, "names")= chr "shape" $ var.thresh : logi FALSE $ est : chr "MEDIANS" $ opt.value : Named num -6.07e-06 ..- attr(*, "names")= chr "shape" $ threshold.call: chr "0" - attr(*, "class")= chr [1:2] "uvpot" "pot" > f1 Estimator: MEDIANS Varying Threshold: FALSE Threshold Call: 0 Number Above: 30 Proportion Above: 1 Estimates scale shape 0.7077 0.4202 Optimization Information Convergence: successful Function Evaluations: 44 > > proc.time() user system elapsed 0.95 0.12 1.00