Currycarbon.Calibration.Bchron

Documentation

calibrateDateBchron :: CalibrationDistribution -> Bool -> Bool -> CalCurveBP -> UncalC14 -> Either CurrycarbonException CalPDF

Intercept calibration as implemented in the Bchron R package (see Bchron)

>>> :{
  let calResult = calibrateDateBchron NormalDist False True intcal20 (UncalC14 "" 3000 30)
      simplifyResult = \(Right (CalPDF _ age dens)) -> VU.zip (VU.take 3 age) (VU.take 3 dens)
  in simplifyResult calResult
:}
[(-1413,1.0703295e-5),(-1412,1.4653518e-5),(-1411,1.799142e-5)]