[Bio] / FigWebServices / heat_map.cgi Repository:
ViewVC logotype

Diff of /FigWebServices/heat_map.cgi

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.10, Mon Jun 19 05:52:52 2006 UTC revision 1.11, Mon Jun 19 15:45:29 2006 UTC
# Line 306  Line 306 
306      # identify those things with a significant difference and make a cool table of them      # identify those things with a significant difference and make a cool table of them
307    
308      # read the xipe attribute for significant differences      # read the xipe attribute for significant differences
309      my $xipe;      my $xipe; my $seen;
310      foreach my $i (0 .. $#genomes)      foreach my $i (0 .. $#genomes)
311      {      {
312          foreach my $attr ($fig->get_attributes($genomes[$i], "xipe"))          foreach my $attr ($fig->get_attributes($genomes[$i], "xipe"))
313          {          {
314              my @pieces=split /\:/, $attr->[2];              my @pieces=split /\:/, $attr->[2];
315    
316                # this is a hack to ignore things with > 1 entry. We should clean this up and show based on confidence
317                next if ($seen->{$genomes[$i]}->{$pieces[0]}->{$pieces[1]});
318                $seen->{$genomes[$i]}->{$pieces[0]}->{$pieces[1]}=1;
319              # note that pieces has lots of information about confidence etc that we are ignoring right now              # note that pieces has lots of information about confidence etc that we are ignoring right now
320              if (@pieces)              if (@pieces)
321              {              {

Legend:
Removed from v.1.10  
changed lines
  Added in v.1.11

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3