## S3 method for class 'credibleshiftset':
plot(x, plotmax=9, method="phylogram", pal="RdYlBu", shiftColor="black",
spex="s", add.freq.text=TRUE, use.plot.bammdata=TRUE, border=TRUE, legend=FALSE,
send2pdf=FALSE, logcolor = FALSE, breaksmethod='linear',
color.interval=NULL, JenksSubset=20000, ...)credibleshiftset.plot.bammdata.plot.bammdata (TRUE) or plot.phylo (FALSE).assignColorBreaks.NA. See details in plot.bammdata for further details.breaksmethod = "jenks", the number of regularly spaced samples to subset from the full rates vector. Only relevant for large datasets. See help file for assignColorBreaks.plot.bammdata.plotmax most-probable shift configurations sampled with BAMM. Shift configurations are plotted in a single graphics window. The posterior probability (frequency) of each rate shift configuration in the posterior is shown (omitted with argument add.freq.text = FALSE).Points are added to the branches subtending the nodes of each rate configuration. The size of the point is proportional to the marginal probability that a shift occurs on a specific branch.
credibleShiftSet, distinctShiftConfigurations, plot.bammdata, plot.bammshiftsdata(events.whales)
data(whales)
ed <- getEventData(whales, events.whales, nsamples=500)
cset <- credibleShiftSet(ed, expectedNumberOfShifts = 1, threshold = 5)
plot(cset)Run the code above in your browser using DataLab