dist <- dist_inverse_exponential(rate = 1:5)
dist
#> <distribution[5]>
#> [1] InvExp(1) InvExp(2) InvExp(3) InvExp(4) InvExp(5)
mean(dist)
#> [1] NA NA NA NA NA
variance(dist)
#> [1] NA NA NA NA NA
support(dist)
#> <support_region[5]>
#> [1] (0,Inf) (0,Inf) (0,Inf) (0,Inf) (0,Inf)
generate(dist, 10)
#> [[1]]
#> [1] 9.2400320 63.2703960 0.9602584 0.6596902 0.9062871 0.7698664
#> [7] 23.3995924 2.7857285 0.8293267 5.6580065
#>
#> [[2]]
#> [1] 0.7153248 0.7981332 1.7412552 0.2288923 1.0930573 1.4525493 0.7817362
#> [8] 1.4662196 1.7015061 0.6409433
#>
#> [[3]]
#> [1] 0.5099542 1.3961225 0.4886816 0.2808755 0.1592369 0.4418894 0.2345340
#> [8] 0.8580179 0.1929121 0.7466854
#>
#> [[4]]
#> [1] 0.3518392 2.5670389 0.1788897 0.3724048 0.2822100 0.2051767 0.1538066
#> [8] 2.3945767 0.8234078 0.3082324
#>
#> [[5]]
#> [1] 0.1196759 0.6196155 0.1867092 3.9242555 0.8407852 0.1100121 0.3735229
#> [8] 0.3161606 0.1029361 0.1283063
#>
density(dist, 2)
#> [1] 0.15163266 0.09735010 0.07054014 0.05515606 0.04524187
density(dist, 2, log = TRUE)
#> [1] -1.886294 -2.329442 -2.651573 -2.897589 -3.095732
cdf(dist, 4)
#> [1] 0.7788008 0.8824969 0.9200444 0.9394131 0.9512294
quantile(dist, 0.7)
#> [1] 2.8036733 1.4018366 0.9345578 0.7009183 0.5607347