Gives the events of a series nearest to a specified time
EventSeriesLookup[eseries, time]
EventSeriesLookup[eseries, time, ptype]
EventSeriesLookup[eseries, time, ptype -> prop]
EventSeriesLookup[eseries, time, ptype, n]
EventSeriesLookup[eseries, time, ptype, {n, r}]