MR: Body Mass Estimates Using Campione and Evans (2012)
In MASSTIMATE: Body Mass Estimation Equations for Vertebrates

Description Usage Arguments Details Value Author(s) References See Also Examples

This function presents the multiple regressions equations from Campione and Evans (2012) for esimating body mass in terretrial vertebartes using humeral and femoral circumferences

1	MR(HC, FC, equation = c("raw","phylocor"), data = NULL)

`HC`	a value or vector representing humeral circumference (in mm)
`FC`	a value or vector representing femoral circumference (in mm)
`equation`	desired estimation equation. Two possible choices (See Details)
`data`	an optional object of `class = "data.frame"` or `class = "matrix"`

The function includes two different equations. equation = "raw" applies the multiple regression based on the raw (non-phylogenetically corrected) relationship - equation 5 of Campione and Evans (2012). equation = "phylocor" applies the multiple regressions taking phylogenetic relationships into account - equation 6 of Campione and Evans (2012).

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.

Four numeric values or columns are returned:

`log.masstimate`	A numeric value or vector representing the mass estimate(s) in log10 grams
`MR`	A numeric value or vector representing the mass estimate(s) in grams
`upper.MR`	A numeric value or vector representing the upper prediction error based on that derived for the specific equation by Campione and Evans (2012)
`lower.MR`	A numeric value or vector representing the lower prediction error

Nicolas E. Campione

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.

QE quadrupeds AHR1985 MCF2004

##Dinosaur data from Campione and Evans (2012) for quadrupedal dinosaurs
data(dinos)

##Combined equation based on the raw regression
MR(dinos$HC, dinos$FC, equation = "raw", data = dinos)

##Combined equation based on the phylogenetically corrected regression, data not specified
MR(dinos$HC, dinos$FC, equation = "phylocor")