Skip to contents

Part of Pedigree Curation

Usage

calcAge(birth, exit)

Arguments

birth

Date vector of birth dates

exit

Date vector of exit dates.

Value

A numeric vector (NA allowed) indicating age in years, rounded to one decimal place, from "birth" to "exit" or the current date if "exit" is NA. If birth has length zero, it is returned unchanged (a Date, not numeric, vector).

Details

Given vectors of birth and exit dates, calculate an individuals age. If no exit date is provided, the calculation is based on the current date.

Examples

library(nprcgenekeepr)
qcPed <- nprcgenekeepr::qcPed
originalAge <- qcPed$age ## ages calculated at time of data collection
currentAge <- calcAge(qcPed$birth, qcPed$exit) ## assumes no changes in
## colony