This function is imported from the survival package. See strata.