powered by
Calculate the unnormalized posterior density of the model
postdens(mcmc.output, Y, D, chain = 1)
an mcmc list as produced by clean.mcmc
the data matrix
the number of latent factors
the chain to plot (default = 1)
post a vector containing the posterior density at each iteration##' @examples
# NOT RUN { data("toydata") data("stanfit") dens <- postdens(coda.obj(stanfit), Y = toydata$Y.simul$Y, D = 2, chain = 1) hist(dens) # }
Run the code above in your browser using DataLab