Я использую GenomicRanges, чтобы найти, какие расшифровки одного эксперимента перекрываются с расшифровками другого.
head(to_ranges1)
knowngene chr strand Start Gene
1 uc001aaa.3 chr1 + 9873 16409 DDX11L1
2 uc001aac.4 chr1 - 12361 31370 WASH7P
3 uc001aae.4 chr1 - 12361 21759 WASH7P
library(GenomicRanges)
object_one<-with(to_ranges, GRanges(chr, IRanges(Start,End),
strand,names=knowngene,Gene=Gene)
object_two<-with(to_ranges, GRanges(chr, IRanges(Start,End),
strand,names=knowngene, Gene=Gene))
mm<-findOverlaps(object_one,object_two)
solution <- data.frame(as.data.frame(object_one[as.matrix(mm)[,1],]),
as.data.frame(object_two[as.matrix(mm)[,2],]))
То, что я пытаюсь найти, - это ШИРИНА перекрывающегося сегмента между попаданиями в кадре данных решения, однако единственная ширина, которую я могу получить, связана с исходными стенограммами до процедуры перекрытия.
Не могли бы вы помочь мне пожалуйста?