hpd.RdCompute the Highest Posterior Density Interval (HPD) from an inverse density function (hpd) or a vector of realizations of the distribution (emp.hpd).
hpd(posterior.icdf, conf=0.95, tol=0.00000001,...)
emp.hpd(x, conf=0.95, lower, upper)Function, the inverse cdf of the posterior distribution (usually a function whose name starts with 'q').
A vector of realizations from the posterior distribution.
Scalar, the credible level desired.
Scalar, the tolerance for optimize.
Additional arguments to posterior.icdf.
Optional lower bound on support of x.
Optional upper bound on support of x.
These functions compute the highest posterior density intervals
(sometimes called minimum length confidence intervals) for a Bayesian
posterior distribution. The hpd function is used when you have
a function representing the inverse cdf (the common case with
conjugate families). The emp.hpd function is used when you
have realizations of the posterior (when you have results from an MCMC
run).
A vector of length 2 with the lower and upper limits of the interval.
These functions assume that the posterior distribution is unimodal, they compute only 1 interval, not the set of intervals that are appropriate for multimodal distributions.
hdr in the hdrcde package.
hpd(qbeta, shape1=50, shape2=250)
#> [1] 0.1253598 0.2092238
tmp <- rbeta(10000, 50, 250)
emp.hpd(tmp)
#> [1] 0.09124569 0.20295238