Mercurial > repos > stef > qdnaseq
diff QDNAseq.R @ 69:b4477584bb03 draft
Uploaded
| author | stef |
|---|---|
| date | Tue, 26 Aug 2014 08:40:24 -0400 |
| parents | 68a090cffb6f |
| children | fb2dfd8ba417 |
line wrap: on
line diff
--- a/QDNAseq.R Tue Aug 26 07:49:13 2014 -0400 +++ b/QDNAseq.R Tue Aug 26 08:40:24 2014 -0400 @@ -299,7 +299,7 @@ png( img_file_path, width=PLOT_WIDTH, height=PLOT_HEIGHT, res=PLOT_RES ); par( PAR_SET ) plot( copyNumbersSmooth[ ,sample ], main=paste(sample, ": CopyNumbers", sep="") ) - mtext( paste( binSizeString, " bins" sep=""), 3 ) + mtext( paste( binSizeString, " bins", sep=""), 3 ) abline( h=c(-2,-1,1,2,3,4), lty=1, lwd=0.5, col="grey" ) dev.off() @@ -313,8 +313,8 @@ ## COPYNUMBER PLOT png( img_file_path, width=PLOT_WIDTH, height=PLOT_HEIGHT, res=PLOT_RES ); par( PAR_SET ) - plot( copyNumbersSegmented[ ,sample ], main=paste(sample, ": CopyNumbers and Segments", sep="") ); - mtext( paste( "(", binSizeString, " bins)" sep=""), 3 ) + plot( copyNumbersSegmented[ ,sample ], main=paste(sample, ": CopyNumbers and Segments", sep="") ) + mtext( paste( "(", binSizeString, " bins)", sep=""), 3 ) abline( h=c(-2,-1,1,2,3,4), lty=1, lwd=0.5, col="grey" ) dev.off()