time_apply function

Apply a function to a time series by period