Mercurial > repos > stef > qdnaseq
diff QDNAseq.R @ 67:2d939f4c23fe draft
Uploaded
| author | stef |
|---|---|
| date | Tue, 26 Aug 2014 07:38:40 -0400 |
| parents | 823791a3d7e1 |
| children | 68a090cffb6f |
line wrap: on
line diff
--- a/QDNAseq.R Wed Aug 20 11:22:43 2014 -0400 +++ b/QDNAseq.R Tue Aug 26 07:38:40 2014 -0400 @@ -135,7 +135,7 @@ ## ================================================== MAIN_NAME <- '[INFO] ' TOOL_PATH <- getScriptPath() -CSS_FILE <- paste( TOOL_PATH, '/QDNAseq.css', sep="" ) +CSS_FILE <- paste( TOOL_PATH, '/static/css/QDNAseq.css', sep="" ) DECIMALS <- 3 WEB_LINK <- 'http://www.bioconductor.org/packages/release/bioc/html/QDNAseq.html' PURE_CSS <- 'http://yui.yahooapis.com/pure/0.5.0/pure-min.css' @@ -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() @@ -314,7 +314,7 @@ 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 ) + mtext( paste( "(", binSizeString, " bins)" sep=""), 3 ) abline( h=c(-2,-1,1,2,3,4), lty=1, lwd=0.5, col="grey" ) dev.off()