Match data and phylogeny based on model formula

Share:

Description

Combines phylogeny and data to ensure that tips in phylogeny match data and that observations with missing values are removed. This function uses variables provided in the 'formula' argument to:

  • Remove NA's: Check if there is any row with NA in the variables included in the formula. All rows containing NA will be removed from the data

  • Match data and phy: Check if tips from phylogeny match rownames in data. Tips not present in data and phy will be removed from the phylogeny and data

  • Return matched data and phy: The returned data has no NA in the variables included in 'formula' and only rows that match phylogeny tips. Returned phy has only tips that match data

Used internally in samp_phylm,samp_phyglm,clade_phylm, clade_phyglm,intra_phylm,intra_phyglm and tree_phylm. Users can also directly use this function to combine a phylogeny and a dataset.

Usage

1

Arguments

formula

The model formula

data

Data frame containing species traits with row names matching tips in phy.

phy

A phylogeny (class 'phylo' or 'multiphylo')

Details

This function uses all variables provided in the 'formula' to match data and phylogeny. To avoid cropping the full dataset, 'match_dataphy' searches for NA values only on variables provided by formula. Missing values on other variables, not included in 'formula', will not be removed from data.

This ensures consistance between data and phylogeny only for the variables that are being used in the model (set by 'formula').

If phy is a 'multiphylo' object, all phylogenies will be cropped to match data. The returned phyogeny will be a 'multiphylo' object.

Value

The function match_dataphy returns a list with the following components:

data: Cropped dataset matching phylogeny

phy: Cropped phylogeny matching data

dropped: Species dropped from phylogeny and removed from data.

Note

If tips are removed from the phylogeny and data or if rows containing missing values are removed from data, a message will be printed with the details. Further, the final number of species that match data and phy will always be reported by a message.

Author(s)

Caterina Penone & Gustavo Paterno

References

This function is largely inspired by the function comparative.data in caper package David Orme, Rob Freckleton, Gavin Thomas, Thomas Petzoldt, Susanne Fritz, Nick Isaac and Will Pearse (2013). caper: Comparative Analyses of Phylogenetics and Evolution in R. R package version 0.5.2. http://CRAN.R-project.org/package=caper

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
# Load data:
data(alien)
head(alien$data)
# Match data and phy based on model formula:
comp.data <- match_dataphy(gestaLen ~ adultMass, data = alien$data, alien$phy[[1]])
comp.data2 <- match_dataphy(homeRange ~ adultMass, data = alien$data, alien$phy)
# Check data:
comp.data$data
# Check phy:
comp.data$phy
# See species dropped from phy or data:
comp.data$dropped

Want to suggest features or report bugs for rdrr.io? Use the GitHub issue tracker.