## ----setup, include=FALSE-----------------------------------------------------
if (!requireNamespace("Matrix", quietly = TRUE)) {
    stop("Matrix needed for this vignette to compile. Please install it.")
}
knitr::opts_chunk$set(echo = TRUE)
knitr::opts_chunk$set(fig.width = 6)
knitr::opts_chunk$set(fig.height = 6)
library(treestats)
library(Matrix)

## ----list---------------------------------------------------------------------
list_statistics()

## ----colless------------------------------------------------------------------
phy <- ape::rphylo(n = 100, birth = 1, death = 0.1)

treestats::colless(phy)

## ----colless2-----------------------------------------------------------------
treestats::colless(phy, normalization = "yule")

## ----all_stats----------------------------------------------------------------
all_stats <- calc_all_stats(phy)

## ----all_stats3---------------------------------------------------------------
balance_stats <- calc_topology_stats(phy)
unlist(balance_stats)