age_components function

Extract age components from a model