# NOT RUN {
data(cleveland)
densities <- with(cleveland, Wdensities(y, posterior.p, prior.p))
# Example which requires fitting a mixture distribution
data(fitonly)
densities <- with(fitonly, Wdensities(y, posterior.p, prior.p))
# }
Run the code above in your browser using DataLab