a ggplot scale to convert a BP axis to AD

BP2AD_trans()