geiger (version 0.2-5)

dtt: Disparity-through-time

Description

Creates a disparity-through-time plot for either a single data set or multiple data sets (for example, from simulations)

Usage

dtt(phy, data, disp = "avg.sq")

Arguments

phy

Phylogenetic tree in 'phylo' format

data

Data - either actual or simulated

disp

Disparity metric - see disp.calc

Value

• Average disparity for clades whose stem crosses each time interval in the tree

References

Harmon et al. 2003

Examples

data(geospiza)
attach(geospiza)

drop.tip(geospiza.tree, "olivacea")->g.tree

disp.data<-dtt(g.tree, geospiza.data)
ltt<-sort(branching.times(g.tree), decr=TRUE)
ltt<-c(0, (max(ltt)-ltt)/max(ltt));
plot(ltt, disp.data, type="l", lwd=2)