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