Median
Usage
# S4 method for class 'CalibratedAges'
median(x, na.rm = FALSE, ..., calendar = get_calendar())Arguments
- x
A
CalibratedAgesobject.- na.rm
A
logicalscalar: shouldNAvalues be stripped before the computation proceeds?- ...
Currently not used.
- calendar
An
aion::TimeScaleobject specifying the target calendar (seeaion::calendar()). IfNULL, rata die are returned.
Value
A numeric vector.
See also
Other statistics:
interval_credible(),
interval_hdr(),
mean(),
quantile()
Examples
## Calibrate multiple dates
cal <- c14_calibrate(
values = c(5000, 4500),
errors = c(45, 35),
names = c("X", "Y")
)
## Statistics
quantile(cal)
#> 0% 25% 50% 75% 100%
#> X -4034 -3876 -3778 -3729 -3540
#> Y -4034 -3282 -3210 -3144 -2916
median(cal)
#> X Y
#> -3778 -3210
mean(cal)
#> X Y
#> -3793.208 -3210.544
## Plot
plot(cal, calendar = CE())
## Need to set 'calendar'
abline(v = median(cal, calendar = CE()), lty = 2, col = "blue")
abline(v = mean(cal, calendar = CE()), lty = 2, col = "red")