LengthAdded | R Documentation |
Would tree lengths change if a character was coded as ambiguous for each leaf \insertCitePol2009TreeSearch?
LengthAdded(trees, char, concavity = Inf)
PolEscapa(trees, char, concavity = Inf)
trees |
List of trees of class |
char |
|
concavity |
Determines the degree to which extra steps beyond the first
are penalized. Specify a numeric value to use implied weighting
\insertCiteGoloboff1993TreeSearch; |
High values for a leaf indicate that its coding contributes to instability ("wildcard" or "roguish" behaviour; see Roguefor further details). The coding is in tension with other data, which may indicate that the assumptions of homology that underlie the character's construction and scoring require careful scrutiny – or that the taxon in question has been subject to convergent evolution.
When inapplicable tokens are present in a character, the applicability of each coding is maintained: i.e. a leaf coded with an applicable token is never allowed to take an inapplicable value; and an inapplicable token remains inapplicable.
LengthAdded()
returns a named numeric vector listing the mean
absolute change to tree length resulting if the character were coded
ambiguous for each leaf in turn, under the specified concavity constant.
Martin R. Smith (martin.smith@durham.ac.uk)
Other tree scoring:
CharacterLength()
,
IWScore()
,
MinimumLength()
,
MorphyTreeLength()
,
TaxonInfluence()
trees <- inapplicable.trees[["Vinther2008"]]
dataset <- inapplicable.phyData[["Vinther2008"]]
char <- dataset[, 11]
added <- LengthAdded(trees, char)
PlotCharacter(
tree = trees[[1]],
dataset = char,
tip.color = 1 + added[trees[[1]]$tip.label] # Colour by added steps
) -> XX # Suppress return value; display plot only
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.