Added overlap.func.R