Comparison of Null hypothesis with other extinction histories

It compares an object generated either by the Mostconnected or ExtinctionOrder functions with a null hypothesis generated by the RandomExtinctions function it is important that RandomExtinctions is in plot = T.

Usage

CompareExtinctions(Nullmodel, Hypothesis)

Arguments

Nullmodel

an object generated by the RandomExtinctions

Hypothesis

Extinction history generated by the Mostconnected or ExtinctionOrder fuction

Value

a plot comparing the expected value of secondary extinctions originated at random with the observed extinction history.

Author

Derek Corcoran <derek.corcoran.barrios@gmail.com>

M. Isidora Ávila-Thieme <msavila@uc.cl>

Examples

if (FALSE) {
data("Less_Connected")
History <- SimulateExtinctions(Network = Less_Connected, Method = "Mostconnected")
NullHyp <- RandomExtinctions(Network = Less_Connected, nsim = 100)
CompareExtinctions(Nullmodel = NullHyp, Hypothesis = History)
}