git-svn-id: file:///home/git/hedgehog.fhcrc.org/bioconductor/trunk/madman/Rpacks/gmapR@75584 bc3139a8-67e5-0310-9ffc-ced21a209358
... | ... |
@@ -71,7 +71,7 @@ test_GmapGenome_spliceSites_replacement <- function() { |
71 | 71 |
rngTP53 <- getTP53Range() |
72 | 72 |
|
73 | 73 |
exonsByTx <- exonsBy(txdb, by="tx") |
74 |
- exonsInRegion <- exonsByTx[exonsByTx %in% rngTP53] |
|
74 |
+ exonsInRegion <- exonsByTx[exonsByTx %over% rngTP53] |
|
75 | 75 |
|
76 | 76 |
##shift coords of retrieved exons so the ranges match the |
77 | 77 |
##region of the genome used for this example |