JAL-629 Change all stdout and stderr output to use Console.outPrintln and Console...
[jalview.git] / src / jalview / analysis / scoremodels / ScoreMatrix.java
index f0115bf..aa841ac 100644 (file)
  */
 package jalview.analysis.scoremodels;
 
+import jalview.api.AlignmentViewPanel;
+import jalview.api.analysis.PairwiseScoreModelI;
 import jalview.api.analysis.ScoreModelI;
+import jalview.api.analysis.SimilarityParamsI;
+import jalview.datamodel.AlignmentView;
+import jalview.math.Matrix;
+import jalview.math.MatrixI;
+import jalview.util.Comparison;
 
-import java.io.BufferedReader;
-import java.io.IOException;
-import java.io.InputStream;
-import java.io.InputStreamReader;
 import java.util.Arrays;
-import java.util.StringTokenizer;
 
-public class ScoreMatrix extends PairwiseSeqScoreModel implements
-        ScoreModelI
+/**
+ * A class that models a substitution score matrix for any given alphabet of
+ * symbols. Instances of this class are immutable and thread-safe, so the same
+ * object is returned from calls to getInstance().
+ */
+public class ScoreMatrix extends SimilarityScoreModel
+        implements PairwiseScoreModelI
 {
-  public static final short UNMAPPED = (short) -1;
+  private static final char GAP_CHARACTER = Comparison.GAP_DASH;
 
-  private static final String DELIMITERS = " ,\t";
+  /*
+   * an arbitrary score to assign for identity of an unknown symbol
+   * (this is the value on the diagonal in the * column of the NCBI matrix)
+   * (though a case could be made for using the minimum diagonal value)
+   */
+  private static final int UNKNOWN_IDENTITY_SCORE = 1;
 
-  private static final String COMMENT_CHAR = "#";
+  /*
+   * Jalview 2.10.1 treated gaps as X (peptide) or N (nucleotide)
+   * for pairwise scoring; 2.10.2 uses gap score (last column) in
+   * score matrix (JAL-2397)
+   * Set this flag to true (via Groovy) for 2.10.1 behaviour
+   */
+  private static boolean scoreGapAsAny = false;
+
+  public static final short UNMAPPED = (short) -1;
 
   private static final String BAD_ASCII_ERROR = "Unexpected character %s in getPairwiseScore";
 
@@ -44,10 +64,16 @@ public class ScoreMatrix extends PairwiseSeqScoreModel implements
 
   /*
    * the name of the model as shown in menus
+   * each score model in use should have a unique name
    */
   private String name;
 
   /*
+   * a description for the model as shown in tooltips
+   */
+  private String description;
+
+  /*
    * the characters that the model provides scores for
    */
   private char[] symbols;
@@ -69,24 +95,71 @@ public class ScoreMatrix extends PairwiseSeqScoreModel implements
    */
   private boolean peptide;
 
+  private float minValue;
+
+  private float maxValue;
+
+  private boolean symmetric;
+
+  /**
+   * Constructor given a name, symbol alphabet, and matrix of scores for pairs
+   * of symbols. The matrix should be square and of the same size as the
+   * alphabet, for example 20x20 for a 20 symbol alphabet.
+   * 
+   * @param theName
+   *          Unique, human readable name for the matrix
+   * @param alphabet
+   *          the symbols to which scores apply
+   * @param values
+   *          Pairwise scores indexed according to the symbol alphabet
+   */
+  public ScoreMatrix(String theName, char[] alphabet, float[][] values)
+  {
+    this(theName, null, alphabet, values);
+  }
+
   /**
-   * Constructor
+   * Constructor given a name, description, symbol alphabet, and matrix of
+   * scores for pairs of symbols. The matrix should be square and of the same
+   * size as the alphabet, for example 20x20 for a 20 symbol alphabet.
    * 
-   * @param name
+   * @param theName
    *          Unique, human readable name for the matrix
+   * @param theDescription
+   *          descriptive display name suitable for use in menus
    * @param alphabet
    *          the symbols to which scores apply
-   * @param matrix
+   * @param values
    *          Pairwise scores indexed according to the symbol alphabet
    */
-  public ScoreMatrix(String name, char[] alphabet, float[][] matrix)
+  public ScoreMatrix(String theName, String theDescription, char[] alphabet,
+          float[][] values)
   {
-    this.matrix = matrix;
-    this.name = name;
+    if (alphabet.length != values.length)
+    {
+      throw new IllegalArgumentException(
+              "score matrix size must match alphabet size");
+    }
+    for (float[] row : values)
+    {
+      if (row.length != alphabet.length)
+      {
+        throw new IllegalArgumentException(
+                "score matrix size must be square");
+      }
+    }
+
+    this.matrix = values;
+    this.name = theName;
+    this.description = theDescription;
     this.symbols = alphabet;
 
     symbolIndex = buildSymbolIndex(alphabet);
 
+    findMinMax();
+
+    symmetric = checkSymmetry();
+
     /*
      * crude heuristic for now...
      */
@@ -94,6 +167,52 @@ public class ScoreMatrix extends PairwiseSeqScoreModel implements
   }
 
   /**
+   * Answers true if the matrix is symmetric, else false. Usually, substitution
+   * matrices are symmetric, which allows calculations to be short cut.
+   * 
+   * @return
+   */
+  private boolean checkSymmetry()
+  {
+    for (int i = 0; i < matrix.length; i++)
+    {
+      for (int j = i; j < matrix.length; j++)
+      {
+        if (matrix[i][j] != matrix[j][i])
+        {
+          return false;
+        }
+      }
+    }
+    return true;
+  }
+
+  /**
+   * Record the minimum and maximum score values
+   */
+  protected void findMinMax()
+  {
+    float min = Float.MAX_VALUE;
+    float max = -Float.MAX_VALUE;
+    if (matrix != null)
+    {
+      for (float[] row : matrix)
+      {
+        if (row != null)
+        {
+          for (float f : row)
+          {
+            min = Math.min(min, f);
+            max = Math.max(max, f);
+          }
+        }
+      }
+    }
+    minValue = min;
+    maxValue = max;
+  }
+
+  /**
    * Returns an array A where A[i] is the position in the alphabet array of the
    * character whose value is i. For example if the alphabet is { 'A', 'D', 'X'
    * } then A['D'] = A[68] = 1.
@@ -103,11 +222,14 @@ public class ScoreMatrix extends PairwiseSeqScoreModel implements
    * Mappings are added automatically for lower case symbols (for non case
    * sensitive scoring), unless they are explicitly present in the alphabet (are
    * scored separately in the score matrix).
+   * <p>
+   * the gap character (space, dash or dot) included in the alphabet (if any) is
+   * recorded in a field
    * 
    * @param alphabet
    * @return
    */
-  static short[] buildSymbolIndex(char[] alphabet)
+  short[] buildSymbolIndex(char[] alphabet)
   {
     short[] index = new short[MAX_ASCII + 1];
     Arrays.fill(index, UNMAPPED);
@@ -142,6 +264,12 @@ public class ScoreMatrix extends PairwiseSeqScoreModel implements
   }
 
   @Override
+  public String getDescription()
+  {
+    return description;
+  }
+
+  @Override
   public boolean isDNA()
   {
     return !peptide;
@@ -153,27 +281,62 @@ public class ScoreMatrix extends PairwiseSeqScoreModel implements
     return peptide;
   }
 
-  @Override
+  /**
+   * Returns a copy of the score matrix as used in getPairwiseScore. If using
+   * this matrix directly, callers <em>must</em> also call
+   * <code>getMatrixIndex</code> in order to get the matrix index for each
+   * character (symbol).
+   * 
+   * @return
+   * @see #getMatrixIndex(char)
+   */
   public float[][] getMatrix()
   {
-    return matrix;
+    float[][] v = new float[matrix.length][matrix.length];
+    for (int i = 0; i < matrix.length; i++)
+    {
+      v[i] = Arrays.copyOf(matrix[i], matrix[i].length);
+    }
+    return v;
   }
 
   /**
-   * Returns the pairwise score for substituting c with d, or zero if c or d is
-   * an unscored or unexpected character
+   * Answers the matrix index for a given character, or -1 if unmapped in the
+   * matrix. Use this method only if using <code>getMatrix</code> in order to
+   * compute scores directly (without symbol lookup) for efficiency.
+   * 
+   * @param c
+   * @return
+   * @see #getMatrix()
+   */
+  public int getMatrixIndex(char c)
+  {
+    if (c < symbolIndex.length)
+    {
+      return symbolIndex[c];
+    }
+    else
+    {
+      return UNMAPPED;
+    }
+  }
+
+  /**
+   * Returns the pairwise score for substituting c with d. If either c or d is
+   * an unexpected character, returns 1 for identity (c == d), else the minimum
+   * score value in the matrix.
    */
   @Override
   public float getPairwiseScore(char c, char d)
   {
-    if (c > MAX_ASCII)
+    if (c >= symbolIndex.length)
     {
-      System.err.println(String.format(BAD_ASCII_ERROR, c));
+      jalview.bin.Console.errPrintln(String.format(BAD_ASCII_ERROR, c));
       return 0;
     }
-    if (d > MAX_ASCII)
+    if (d >= symbolIndex.length)
     {
-      System.err.println(String.format(BAD_ASCII_ERROR, d));
+      jalview.bin.Console.errPrintln(String.format(BAD_ASCII_ERROR, d));
       return 0;
     }
 
@@ -183,7 +346,14 @@ public class ScoreMatrix extends PairwiseSeqScoreModel implements
     {
       return matrix[cIndex][dIndex];
     }
-    return 0;
+
+    /*
+     * one or both symbols not found in the matrix
+     * currently scoring as 1 (for identity) or the minimum
+     * matrix score value (otherwise)
+     * (a case could be made for using minimum row/column value instead)
+     */
+    return c == d ? UNKNOWN_IDENTITY_SCORE : getMinimumScore();
   }
 
   /**
@@ -196,7 +366,12 @@ public class ScoreMatrix extends PairwiseSeqScoreModel implements
   }
 
   /**
-   * Print the score matrix, optionally formatted as html, with the alphabet symbols as column headings and at the start of each row
+   * Print the score matrix, optionally formatted as html, with the alphabet
+   * symbols as column headings and at the start of each row.
+   * <p>
+   * The non-html format should give an output which can be parsed as a score
+   * matrix file
+   * 
    * @param html
    * @return
    */
@@ -212,6 +387,10 @@ public class ScoreMatrix extends PairwiseSeqScoreModel implements
       sb.append("<table border=\"1\">");
       sb.append(html ? "<tr><th></th>" : "");
     }
+    else
+    {
+      sb.append("ScoreMatrix ").append(getName()).append("\n");
+    }
     for (char sym : symbols)
     {
       if (html)
@@ -251,138 +430,199 @@ public class ScoreMatrix extends PairwiseSeqScoreModel implements
   }
 
   /**
-   * Parse a score matrix from the given input stream and returns a ScoreMatrix
-   * object. If parsing fails, error messages are written to syserr and null is
-   * returned. It is the caller's responsibility to close the input stream.
+   * Answers the number of symbols coded for (also equal to the number of rows
+   * and columns of the score matrix)
    * 
-   * @param is
    * @return
    */
-  public static ScoreMatrix parse(InputStream is)
+  public int getSize()
   {
-    ScoreMatrix sm = null;
-    BufferedReader br = new BufferedReader(new InputStreamReader(is));
-    int lineNo = 0;
-    String name = null;
-    String alphabet = null;
-    float[][] scores = null;
-    int size = 0;
-    int row = 0;
-
-    try
-    {
-      String data;
+    return symbols.length;
+  }
 
-      while ((data = br.readLine()) != null)
+  /**
+   * Computes an NxN matrix where N is the number of sequences, and entry [i, j]
+   * is sequence[i] pairwise multiplied with sequence[j], as a sum of scores
+   * computed using the current score matrix. For example
+   * <ul>
+   * <li>Sequences:</li>
+   * <li>FKL</li>
+   * <li>R-D</li>
+   * <li>QIA</li>
+   * <li>GWC</li>
+   * <li>Score matrix is BLOSUM62</li>
+   * <li>Gaps treated same as X (unknown)</li>
+   * <li>product [0, 0] = F.F + K.K + L.L = 6 + 5 + 4 = 15</li>
+   * <li>product [1, 1] = R.R + -.- + D.D = 5 + -1 + 6 = 10</li>
+   * <li>product [2, 2] = Q.Q + I.I + A.A = 5 + 4 + 4 = 13</li>
+   * <li>product [3, 3] = G.G + W.W + C.C = 6 + 11 + 9 = 26</li>
+   * <li>product[0, 1] = F.R + K.- + L.D = -3 + -1 + -3 = -8
+   * <li>and so on</li>
+   * </ul>
+   * This method is thread-safe.
+   */
+  @Override
+  public MatrixI findSimilarities(AlignmentView seqstrings,
+          SimilarityParamsI options)
+  {
+    char gapChar = scoreGapAsAny ? (seqstrings.isNa() ? 'N' : 'X')
+            : GAP_CHARACTER;
+    String[] seqs = seqstrings.getSequenceStrings(gapChar);
+    return findSimilarities(seqs, options);
+  }
+
+  /**
+   * Computes pairwise similarities of a set of sequences using the given
+   * parameters
+   * 
+   * @param seqs
+   * @param params
+   * @return
+   */
+  protected MatrixI findSimilarities(String[] seqs,
+          SimilarityParamsI params)
+  {
+    double[][] values = new double[seqs.length][seqs.length];
+    for (int row = 0; row < seqs.length; row++)
+    {
+      for (int col = symmetric ? row : 0; col < seqs.length; col++)
       {
-        lineNo++;
-        data = data.trim();
-        if (data.startsWith(COMMENT_CHAR))
+        double total = computeSimilarity(seqs[row], seqs[col], params);
+        values[row][col] = total;
+        if (symmetric)
         {
-          continue;
-        }
-        if (data.toLowerCase().startsWith("scorematrix"))
-        {
-          /*
-           * Parse name from ScoreMatrix <name>
-           */
-          if (name != null)
-          {
-            System.err
-                    .println("Warning: 'ScoreMatrix' repeated in file at line "
-                            + lineNo);
-          }
-          StringTokenizer nameLine = new StringTokenizer(data, DELIMITERS);
-          if (nameLine.countTokens() != 2)
-          {
-            System.err
-                    .println("Format error: expected 'ScoreMatrix <name>', found '"
-                            + data + "' at line " + lineNo);
-            return null;
-          }
-          nameLine.nextToken();
-          name = nameLine.nextToken();
-          continue;
-        }
-        else if (name == null)
-        {
-          System.err
-                  .println("Format error: 'ScoreMatrix <name>' should be the first non-comment line");
-          return null;
+          values[col][row] = total;
         }
+      }
+    }
+    return new Matrix(values);
+  }
 
+  /**
+   * Calculates the pairwise similarity of two strings using the given
+   * calculation parameters
+   * 
+   * @param seq1
+   * @param seq2
+   * @param params
+   * @return
+   */
+  protected double computeSimilarity(String seq1, String seq2,
+          SimilarityParamsI params)
+  {
+    int len1 = seq1.length();
+    int len2 = seq2.length();
+    double total = 0;
+
+    int width = Math.max(len1, len2);
+    for (int i = 0; i < width; i++)
+    {
+      if (i >= len1 || i >= len2)
+      {
         /*
-         * next line after ScoreMatrix should be the alphabet of scored symbols
+         * off the end of one sequence; stop if we are only matching
+         * on the shorter sequence length, else treat as trailing gap
          */
-        if (alphabet == null)
+        if (params.denominateByShortestLength())
         {
-          alphabet = data;
-          size = alphabet.length();
-          scores = new float[size][];
-          continue;
+          break;
         }
+      }
+
+      char c1 = i >= len1 ? GAP_CHARACTER : seq1.charAt(i);
+      char c2 = i >= len2 ? GAP_CHARACTER : seq2.charAt(i);
+      boolean gap1 = Comparison.isGap(c1);
+      boolean gap2 = Comparison.isGap(c2);
 
+      if (gap1 && gap2)
+      {
         /*
-         * too much information?
+         * gap-gap: include if options say so, else ignore
          */
-        if (row >= size && data.length() > 0) {
-          System.err
-                  .println("Unexpected extra input line in score model file "
-                          + data);
-          return null;
+        if (!params.includeGappedColumns())
+        {
+          continue;
         }
-        
+      }
+      else if (gap1 || gap2)
+      {
         /*
-         * subsequent lines should be the symbol scores
+         * gap-residue: score if options say so
          */
-        StringTokenizer scoreLine = new StringTokenizer(data, DELIMITERS);
-        if (scoreLine.countTokens() != size)
+        if (!params.includeGaps())
         {
-          System.err.println(String.format(
-                  "Expected %d tokens at line %d but found %d", size,
-                  lineNo, scoreLine.countTokens()));
-          return null;
-        }
-        scores[row] = new float[size];
-        int col = 0;
-        String value = null;
-        while (scoreLine.hasMoreTokens()) {
-          try {
-            value = scoreLine.nextToken();
-            scores[row][col] = Float.valueOf(value);
-            col++;
-          } catch (NumberFormatException e)
-          {
-            System.err.println(String.format(
-                    "Invalid score value %s at line %d column %d", value,
-                    lineNo, col));
-            return null;
-          }
+          continue;
         }
-        row++;
       }
-    } catch (IOException e)
+      float score = getPairwiseScore(c1, c2);
+      total += score;
+    }
+    return total;
+  }
+
+  /**
+   * Answers a hashcode computed from the symbol alphabet and the matrix score
+   * values
+   */
+  @Override
+  public int hashCode()
+  {
+    int hs = Arrays.hashCode(symbols);
+    for (float[] row : matrix)
     {
-      System.err.println("Error reading score matrix file: "
-              + e.getMessage() + " at line " + lineNo);
+      hs = hs * 31 + Arrays.hashCode(row);
     }
+    return hs;
+  }
 
-    /*
-     * out of data - check we found enough
-     */
-    if (row < size)
+  /**
+   * Answers true if the argument is a ScoreMatrix with the same symbol alphabet
+   * and score values, else false
+   */
+  @Override
+  public boolean equals(Object obj)
+  {
+    if (!(obj instanceof ScoreMatrix))
+    {
+      return false;
+    }
+    ScoreMatrix sm = (ScoreMatrix) obj;
+    if (Arrays.equals(symbols, sm.symbols)
+            && Arrays.deepEquals(matrix, sm.matrix))
     {
-      System.err
-              .println(String
-                      .format("Expected %d rows of score data in score matrix but only found %d",
-                              size, row));
-      return null;
+      return true;
     }
+    return false;
+  }
 
-    /*
-     * If we get here, then name, alphabet and scores have been parsed successfully
-     */
-    sm = new ScoreMatrix(name, alphabet.toCharArray(), scores);
-    return sm;
+  /**
+   * Returns the alphabet the matrix scores for, as a string of characters
+   * 
+   * @return
+   */
+  String getSymbols()
+  {
+    return new String(symbols);
+  }
+
+  public float getMinimumScore()
+  {
+    return minValue;
+  }
+
+  public float getMaximumScore()
+  {
+    return maxValue;
+  }
+
+  @Override
+  public ScoreModelI getInstance(AlignmentViewPanel avp)
+  {
+    return this;
+  }
+
+  public boolean isSymmetric()
+  {
+    return symmetric;
   }
 }