FAmle (version 1.3.7)

print.metropolis: Bayesian Estimation of Univariate Probability Distributions

Description

See metropolis.

Usage

# S3 method for metropolis
print(x, stats.fun = NULL,...)

Arguments

x

metropolis object corresponding to the fitted model.

stats.fun

An optional function that may be provided by the user in order to obtain a posterior summary (see Example).

…

none...

See Also

metropolis, print

Examples

# NOT RUN {
data(yarns)
x <- yarns$x
fit.x <- mle(x,'gamma',c(.1,.1))
bayes.x <- metropolis(fit.x,50,trans.list=
	list(function(x) exp(x), function(x) exp(x)))
print(bayes.x)
print(bayes.x,stats.fun=function(x) c(mean=mean(x),CV=sd(x)/mean(x)))
# }