overlap code snippets in r

calculate overlap date in r