Mercurial > repos > nilesh > rseqc
view test-data/output.junctionSaturation_plot_r @ 63:27e16a30667a draft default tip
planemo upload for repository https://github.com/galaxyproject/tools-iuc/tree/master/tools/rseqc commit d7544582d5599c67a284faf9232cd2ccc4daa1de
author | iuc |
---|---|
date | Tue, 09 Apr 2024 11:24:55 +0000 |
parents | dbedfc5f5a3c |
children |
line wrap: on
line source
pdf('output.junctionSaturation_plot.pdf') x=c(5,10,15,20,25,30,35,40,45,50,55,60,65,70,75,80,85,90,95,100) y=c(0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1) z=c(0,0,0,0,0,0,1,1,1,1,1,1,1,2,2,2,2,2,2,3) w=c(0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,2) m=max(0,0,0) n=min(0,0,0) plot(x,z/1000,xlab='percent of total reads',ylab='Number of splicing junctions (x1000)',type='o',col='blue',ylim=c(n,m)) points(x,y/1000,type='o',col='red') points(x,w/1000,type='o',col='green') legend(5,0, legend=c("All junctions","known junctions", "novel junctions"),col=c("blue","red","green"),lwd=1,pch=1) dev.off()