get.dmr.genes() is wrong

[czlcaltech]

I believe the correct code should be: get.dmr.genes() <- function (myDMR, subject, id.type = "gene.symbol") { ind = findOverlaps(myDMR, subject) unique(values(subject)[unique(ind@to), id.type]) }

The code package offer is get.dmr.genes() <- function (myDMR, subject, id.type = "gene.symbol") { ind = findOverlaps(subject, myDMR) unique(values(subject)[unique(ind@to), id.type]) } And this would not return correct result.