DanielM0412 has asked for the wisdom of the Perl Monks concerning the following question:
im using a 4by4 matrix, but using a data dumper, i noticed that the numbers didnt add up as they did in the matrix, does anything weird stick out to you guys?
0.95 0.02 0.07 0.07 #A 0.03 0.01 0.06 0.83 #C 0.01 0.02 0.80 0.09 #G 0.01 0.95 0.07 0.01 #T
sub readdt2 { my $ifn = shift; open(my $IFH, "<$ifn") or die "cannot open file $ifn\n"; my $line; my @nt = ("A","C","G","T"); my %ret; my @tmp; for my $j(@nt) { $ret{$j} = []; $line = <$IFH>; chomp($line); @tmp = split(/\s+/,$line); for (my $i=0;$i<=$#tmp;$i++) { $ret{$j}[$i]= $tmp[$i] +0.0001; } } close($IFH); return(\%ret); }
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re: unexpected output,
by zentara (Cardinal) on Jul 20, 2011 at 18:54 UTC | |
by DanielM0412 (Acolyte) on Jul 20, 2011 at 19:00 UTC | |
|
Re: unexpected output,
by ikegami (Patriarch) on Jul 20, 2011 at 19:37 UTC | |
by DanielM0412 (Acolyte) on Jul 20, 2011 at 19:46 UTC | |
by ikegami (Patriarch) on Jul 20, 2011 at 20:43 UTC |