R/leaf.numbers.R

In treeClust: Cluster Distances Through Trees

Defines functions leaf.numbers

Documented in leaf.numbers

leaf.numbers <- function(tree)
  {
    where <- tree$where
    leaves <- as.numeric(dimnames(tree$frame)[[1]])
    leaves[where]
  }

Try the treeClust package in your browser