R Under development (unstable) (2025-06-30 r88369 ucrt) -- "Unsuffered Consequences" Copyright (C) 2025 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. > > require(actuar) Loading required package: actuar Attaching package: 'actuar' The following objects are masked from 'package:stats': sd, var The following object is masked from 'package:grDevices': cm > require(fitdistrplus) Loading required package: fitdistrplus Loading required package: MASS Loading required package: survival > n <- 1e4 > > > #### Inverse exponential #### > > x <- rinvexp(n, 3) > > if(FALSE) + { + fitdistrplus:::startarg_invtransgamma_family(x, "invexp") + fitdistrplus:::startarg_transgamma_family(1/x, "exp") + } > > cdfcomp(fitdist(x, "invexp"), xlogscale = TRUE, do.points = FALSE) > > > #### Inverse transformed gamma #### > > x <- rinvtrgamma(n, 3, 3, 10) > > if(FALSE) + { + fitdistrplus:::startarg_invtransgamma_family(x, "invtrgamma") + fitdistrplus:::startarg_transgamma_family(1/x, "trgamma") + + cutshapeparam(list("shape0"=1e3, "shape33"=1e-10, "theta"=22)) + cutshapeparam(list("shape0"=1e3, "shape33"=1e3, "theta"=22)) + + cutshapeparam(fitdistrplus:::startarg_invtransgamma_family(x, "invtrgamma")) + } > > cdfcomp(fitdist(x, "invtrgamma", lower=0), xlogscale = TRUE, do.points = FALSE) Warning messages: 1: In cov2cor(varcovar) : diag(V) had non-positive or NA entries; the non-finite result may be dubious 2: In sqrt(diag(varcovar)) : NaNs produced > cdfcomp(fitdist(x, "invtrgamma", lower=0, start=list("shape1"=100, "shape2"=1, "scale"=1/2)), + xlogscale = TRUE, do.points = FALSE) Warning messages: 1: In cov2cor(varcovar) : diag(V) had non-positive or NA entries; the non-finite result may be dubious 2: In sqrt(diag(varcovar)) : NaNs produced > curve(pinvtrgamma(x, 10, 1, 1)) > curve(pinvtrgamma(x, 25, 1, 1/2)) > curve(pinvtrgamma(x, 100, 1, 1/2)) > > x <- rinvparalogis(n, 2, 10) > > cdfcomp(fitdist(x, "invparalogis"), xlogscale = TRUE, do.points = FALSE) > cdfcomp(fitdist(x, "invparalogis", lower=0, start=list("shape"=1e-5, "scale"=1/2), + control=list(trace=1, REPORT=1)), + xlogscale = TRUE, do.points = FALSE) Nelder-Mead direct search function minimizer function value for initial parameters = 21.911639 Scaled convergence tolerance is 3.26509e-07 Stepsize computed as 0.050000 BUILD 3 21.911639 4.885650 EXTENSION 5 21.911639 4.076178 EXTENSION 7 4.885650 2.286623 EXTENSION 9 4.076178 1.432641 EXTENSION 11 2.286623 0.377942 EXTENSION 13 1.432641 0.162735 LO-REDUCTION 15 0.377942 0.132130 HI-REDUCTION 17 0.162735 0.123152 REFLECTION 19 0.132130 0.058587 HI-REDUCTION 21 0.123152 0.058587 EXTENSION 23 0.079239 0.006883 EXTENSION 25 0.058587 -0.167167 EXTENSION 27 0.006883 -0.532696 HI-REDUCTION 29 -0.131490 -0.532696 LO-REDUCTION 31 -0.167167 -0.532696 HI-REDUCTION 33 -0.343725 -0.532696 HI-REDUCTION 35 -0.443438 -0.532696 LO-REDUCTION 37 -0.468781 -0.532696 REFLECTION 39 -0.527306 -0.562617 HI-REDUCTION 41 -0.532696 -0.562617 EXTENSION 43 -0.560245 -0.619974 LO-REDUCTION 45 -0.562617 -0.619974 REFLECTION 47 -0.616503 -0.647760 HI-REDUCTION 49 -0.619974 -0.647760 EXTENSION 51 -0.638754 -0.679468 HI-REDUCTION 53 -0.647760 -0.679468 LO-REDUCTION 55 -0.660204 -0.679468 LO-REDUCTION 57 -0.675342 -0.681017 LO-REDUCTION 59 -0.679468 -0.681017 LO-REDUCTION 61 -0.680346 -0.681017 HI-REDUCTION 63 -0.681013 -0.681135 HI-REDUCTION 65 -0.681017 -0.681207 HI-REDUCTION 67 -0.681135 -0.681243 HI-REDUCTION 69 -0.681207 -0.681243 REFLECTION 71 -0.681241 -0.681265 HI-REDUCTION 73 -0.681243 -0.681271 HI-REDUCTION 75 -0.681265 -0.681271 HI-REDUCTION 77 -0.681266 -0.681272 LO-REDUCTION 79 -0.681271 -0.681272 HI-REDUCTION 81 -0.681272 -0.681273 HI-REDUCTION 83 -0.681272 -0.681273 HI-REDUCTION 85 -0.681273 -0.681273 Exiting from Nelder Mead minimizer 87 function evaluations used Nelder-Mead direct search function minimizer function value for initial parameters = -0.681501 Scaled convergence tolerance is 1.01551e-08 Stepsize computed as 0.197803 BUILD 3 0.539227 -0.681501 HI-REDUCTION 5 -0.152202 -0.681501 HI-REDUCTION 7 -0.488730 -0.681501 HI-REDUCTION 9 -0.616921 -0.681501 HI-REDUCTION 11 -0.659026 -0.681501 LO-REDUCTION 13 -0.668869 -0.681501 LO-REDUCTION 15 -0.676588 -0.681501 HI-REDUCTION 17 -0.678762 -0.681501 LO-REDUCTION 19 -0.679763 -0.681501 LO-REDUCTION 21 -0.680924 -0.681501 HI-REDUCTION 23 -0.681176 -0.681501 LO-REDUCTION 25 -0.681299 -0.681501 LO-REDUCTION 27 -0.681430 -0.681501 HI-REDUCTION 29 -0.681463 -0.681501 LO-REDUCTION 31 -0.681478 -0.681501 LO-REDUCTION 33 -0.681493 -0.681501 HI-REDUCTION 35 -0.681496 -0.681501 LO-REDUCTION 37 -0.681498 -0.681501 HI-REDUCTION 39 -0.681500 -0.681501 HI-REDUCTION 41 -0.681500 -0.681501 HI-REDUCTION 43 -0.681501 -0.681501 HI-REDUCTION 45 -0.681501 -0.681501 LO-REDUCTION 47 -0.681501 -0.681501 HI-REDUCTION 49 -0.681501 -0.681501 Exiting from Nelder Mead minimizer 51 function evaluations used Nelder-Mead direct search function minimizer function value for initial parameters = -0.681501 Scaled convergence tolerance is 1.01552e-08 Stepsize computed as 0.197887 BUILD 3 0.541071 -0.681501 HI-REDUCTION 5 -0.151424 -0.681501 HI-REDUCTION 7 -0.488489 -0.681501 HI-REDUCTION 9 -0.616863 -0.681501 HI-REDUCTION 11 -0.659007 -0.681501 LO-REDUCTION 13 -0.668791 -0.681501 LO-REDUCTION 15 -0.676509 -0.681501 LO-REDUCTION 17 -0.678745 -0.681501 LO-REDUCTION 19 -0.679796 -0.681501 LO-REDUCTION 21 -0.680914 -0.681501 HI-REDUCTION 23 -0.681182 -0.681501 LO-REDUCTION 25 -0.681297 -0.681501 LO-REDUCTION 27 -0.681423 -0.681501 HI-REDUCTION 29 -0.681461 -0.681501 LO-REDUCTION 31 -0.681474 -0.681501 LO-REDUCTION 33 -0.681491 -0.681501 HI-REDUCTION 35 -0.681496 -0.681501 LO-REDUCTION 37 -0.681498 -0.681501 LO-REDUCTION 39 -0.681500 -0.681501 HI-REDUCTION 41 -0.681500 -0.681501 LO-REDUCTION 43 -0.681500 -0.681501 LO-REDUCTION 45 -0.681501 -0.681501 HI-REDUCTION 47 -0.681501 -0.681501 HI-REDUCTION 49 -0.681501 -0.681501 Exiting from Nelder Mead minimizer 51 function evaluations used > > > proc.time() user system elapsed 21.67 0.90 22.57