phylotools (version 0.1.2)

inequality: The inequality of a cutting time

Description

This function could be applied to calculate the inequality of a given time.

Usage

inequality(tree, subtree, h, detail = FALSE)

Arguments

tree

The phylogenetic tree, in class 'phylo' as defined in ape

subtree

The phylogenetic tree, usually the original 'tree' with some of the tips removed.

h

Numeric: The given time

detail

Logical,the time

Details

The inequality of the insufficient sampling is evaluated by Gini coefficient with a range of c(0, 1). If the value equals to zero, a ideally equality observed; if the values equals to 1, a extremely inequality observed.

References

To be added

Examples

data(bird.orders)
rtr1 <- del.tree.tip(bird.orders,3)
inequality(bird.orders, rtr1[[1]], h = 25.25103)