features <- GRanges("chr7", IRanges(start=1000:1001, width=rep(1,2)),
strand=c("+", "-"))
reads <- GRanges("chr7", IRanges(start=c(1000:1003, 1100:1101),
width=rep(1, 6)), strand=rep(c("+","-"), 3))
## Not run:
# mg <- runMetaGene(features, reads, size=4, up=10)
Run the code above in your browser using DataLab