dist <- dist_logarithmic(prob = c(0.33, 0.66, 0.99))
dist
if (FALSE) { # requireNamespace("actuar", quietly = TRUE)
mean(dist)
variance(dist)
support(dist)
generate(dist, 10)
density(dist, 2)
density(dist, 2, log = TRUE)
cdf(dist, 4)
quantile(dist, 0.7)
}
Run the code above in your browser using DataLab