| Previous changeset 2:a9555d172896 (2014-02-13) Next changeset 4:2799221681dd (2014-02-13) |
|
Commit message:
Uploaded |
|
modified:
CoverageReport.pl |
| b |
| diff -r a9555d172896 -r 39c374d4cba7 CoverageReport.pl --- a/CoverageReport.pl Thu Feb 13 04:45:36 2014 -0500 +++ b/CoverageReport.pl Thu Feb 13 04:45:48 2014 -0500 |
| b |
| @@ -235,13 +235,13 @@ $avg = $sum/$counter; close IN; open OUT, ">$wd/Rout/hist.txt"; +if (!defined($dens{'0'})) { + $dens{'0'} = 0; +} foreach (keys(%dens)) { print OUT "$_;$dens{$_}\n"; } close OUT; -if (!defined($dens{'0'})) { - $dens{'0'} = 0; -} open OUT, ">$wd/Rout/ntplot.R"; # read coverage hist in R to plot print OUT 'coverage <- read.table("hist.txt" , as.is = TRUE, header=FALSE,sep=";")'."\n"; |