Learn R Programming

MASSTIMATE (version 1.2)

cQE: Body Mass Estimates Using Campione et al. (in review)

Description

This function presents equations from Campione et al. (in review) for esimating body mass in bipeds using minimum femoral circumference and based on a correction of the quadrupedal equations from Campione and Evans (2012)

Usage

cQE(FC, equation = c("raw", "phylocor"), cor = 2, data = NULL)

Arguments

FC
a value or vector representing femoral circumference (in mm)
equation
desired estimation equation. Two possible choices (See Details)
cor
correction factor to be used ($\alpha{^2}$). The default is 2, as per Campione et al. (in review)
data
an optional object of class = "data.frame" or class = "matrix"

Value

  • Four numeric values or columns are returned:
  • log.cQEA numeric value or vector representing the mass estimate(s) in log10 grams
  • cQEA numeric value or vector representing the mass estimate(s) in grams
  • upper.cQEA numeric value or vector representing the upper prediction error based on that derived for the specific equation in Campione and Evans (2012)
  • lower.cQEA numeric value or vector representing the lower prediction error

Details

The function includes two different equations. equation = "raw" applies the correction factor derived in Campione et al. (in review) to the raw (non-phylogenetically corrected) bivariate regression equation from Campione and Evans (2012). equation = "phylocor" applies the same correction factor to the phylogenetically corrected equation presented in the same study.

cor = 2 refers to the correction factor ($\alpha{^2}$) to be used. The default (cor = 2) refers the initial derivation in Campione et al. (in review), however, this value can be modified based on the level of eccentricity of the femur. A set of values for cor corresponding to set eccentricities can be found in table S2 of Campione et al. (in review).

If a data object is specified, the mass estiamtes and additional results will be added as columns to the data.frame or matrix within that object.

References

Campione, N. E. and Evans, D. C. (2012) A universal scaling relationship between body mass and proximal limb bone dimensions in quadrupedal terrestrial tetrapods. BMC Biology, 10, 60. Campione, N. E., Evans, D. C., Brown, C. M. and Carrano, M. T. (in review) Body mass estimation in non-avian bipeds using a theoretical conversion to quadruped stylopodial proportions. Methods in Ecology and Evolution

See Also

QE bipeds AHR1985 CF2004 CM1992

Examples

Run this code
##Bipedal dinosaurs
data(dinosbip)

#Estimates for Tyrannosaurus (FMNH PR 2081 "Sue")
sue<-which(dinosbip$Taxon=="TyrannosaurusFMNH2081")
cQE(dinosbip$FC[sue], equation = "raw", cor = 2) #default correction factor
cQE(dinosbip$FC[sue], equation = "raw", cor = 1.815) #based on eccentricity of the femur

##Estimates for the sample of bipedal dinosaurs using phylogeneteically corrected formula
cQE(dinosbip$FC, equation = "phylocor", cor = dinosbip$cor, data = dinosbip)

Run the code above in your browser using DataLab