lindUC.RdDensity, cumulative distribution function, and random generation for the Lindley distribution.
dlind(x, theta, log = FALSE)
plind(q, theta, lower.tail = TRUE, log.p = FALSE)
rlind(n, theta)dlind gives the density,
plind gives the cumulative distribution function, and
rlind generates random deviates.
See lindley for details.
theta <- exp(-1); x <- seq(0.0, 17, length = 700)
dlind(0:10, theta)
#> [1] 0.09893802 0.13696992 0.14221600 0.13125600 0.11356936 0.09433534
#> [7] 0.07618214 0.06026666 0.04693120 0.03609534 0.02748374
if (FALSE) { # \dontrun{
plot(x, dlind(x, theta), type = "l", las = 1, col = "blue",
main = "dlind(x, theta = exp(-1))")
abline(h = 1, col = "grey", lty = "dashed") } # }