dummy_euc_GR <- GRanges(seqnames="DummyRNA",
IRanges(start=round(runif(100)*100),
width=round(runif(100)*100+1)), strand="+",
EUC=round(runif(100)*100))
plotReads(dummy_euc_GR, RNAid="DummyRNA")
Run the code above in your browser using DataLab