pull.pars: Utility function for retrieving parameters from an MCMC chain

In uyedaj/bayou: Bayesian Fitting of Ornstein-Uhlenbeck Models to Phylogenies

Utility function for retrieving parameters from an MCMC chain

Description

Utility function for retrieving parameters from an MCMC chain

Usage

pull.pars(i, chain, model = "OU")

Arguments

i	An integer giving the sample to retrieve
chain	A bayouMCMC chain
model	The parameterization used, either "OU", "QG" or "OUrepar"

Value

A bayou formatted parameter list

Examples

## Not run: 
tree <- sim.bdtree(n=30)
tree$edge.length <- tree$edge.length/max(branching.times(tree))
prior <- make.prior(tree, dists=list(dk="cdpois", dsig2="dnorm", 
             dtheta="dnorm"), 
               param=list(dk=list(lambda=15, kmax=32), 
                 dsig2=list(mean=1, sd=0.01), 
                   dtheta=list(mean=0, sd=3)), 
                     plot.prior=FALSE)
pars <- priorSim(prior, tree, plot=FALSE, nsim=1)$pars[[1]]
dat <- dataSim(pars, model="OU", phenogram=FALSE, tree)$dat
fit <- bayou.mcmc(tree, dat, model="OU", prior=prior, 
             new.dir=TRUE, ngen=5000, plot.freq=NULL)
chain <- load.bayou(fit, save.Rdata=TRUE, cleanup=TRUE)
plotBayoupars(pull.pars(300, chain), tree)

## End(Not run)

uyedaj/bayou documentation built on Jan. 28, 2024, 5:09 a.m.