extract_time_to_event function

Extract per-stratum event times from a formula and data