add OverlapwithTime R code, revise OverlapWithH2Av code