JAL-1432 updated copyright notices
[jalview.git] / src / jalview / analysis / AAFrequency.java
1 /*
2  * Jalview - A Sequence Alignment Editor and Viewer (Version 2.8.0b1)
3  * Copyright (C) 2014 The Jalview Authors
4  * 
5  * This file is part of Jalview.
6  * 
7  * Jalview is free software: you can redistribute it and/or
8  * modify it under the terms of the GNU General Public License 
9  * as published by the Free Software Foundation, either version 3 of the License, or (at your option) any later version.
10  *  
11  * Jalview is distributed in the hope that it will be useful, but 
12  * WITHOUT ANY WARRANTY; without even the implied warranty 
13  * of MERCHANTABILITY or FITNESS FOR A PARTICULAR 
14  * PURPOSE.  See the GNU General Public License for more details.
15  * 
16  * You should have received a copy of the GNU General Public License along with Jalview.  If not, see <http://www.gnu.org/licenses/>.
17  * The Jalview Authors are detailed in the 'AUTHORS' file.
18  */
19 package jalview.analysis;
20
21 import java.util.*;
22
23 import jalview.datamodel.*;
24
25 /**
26  * Takes in a vector or array of sequences and column start and column end and
27  * returns a new Hashtable[] of size maxSeqLength, if Hashtable not supplied.
28  * This class is used extensively in calculating alignment colourschemes that
29  * depend on the amount of conservation in each alignment column.
30  * 
31  * @author $author$
32  * @version $Revision$
33  */
34 public class AAFrequency
35 {
36   // No need to store 1000s of strings which are not
37   // visible to the user.
38   public static final String MAXCOUNT = "C";
39
40   public static final String MAXRESIDUE = "R";
41
42   public static final String PID_GAPS = "G";
43
44   public static final String PID_NOGAPS = "N";
45
46   public static final String PROFILE = "P";
47
48   public static final Hashtable[] calculate(List<SequenceI> list,
49           int start, int end)
50   {
51     return calculate(list, start, end, false);
52   }
53
54   public static final Hashtable[] calculate(List<SequenceI> sequences,
55           int start, int end, boolean profile)
56   {
57     SequenceI[] seqs = new SequenceI[sequences.size()];
58     int width = 0;
59     synchronized (sequences)
60     {
61       for (int i = 0; i < sequences.size(); i++)
62       {
63         seqs[i] = sequences.get(i);
64         if (seqs[i].getLength() > width)
65         {
66           width = seqs[i].getLength();
67         }
68       }
69
70       Hashtable[] reply = new Hashtable[width];
71
72       if (end >= width)
73       {
74         end = width;
75       }
76
77       calculate(seqs, start, end, reply, profile);
78       return reply;
79     }
80   }
81
82   public static final void calculate(SequenceI[] sequences, int start,
83           int end, Hashtable[] result)
84   {
85     calculate(sequences, start, end, result, false);
86   }
87
88   public static final void calculate(SequenceI[] sequences, int start,
89           int end, Hashtable[] result, boolean profile)
90   {
91     Hashtable residueHash;
92     int maxCount, nongap, i, j, v, jSize = sequences.length;
93     String maxResidue;
94     char c;
95     float percentage;
96
97     int[] values = new int[255];
98
99     char[] seq;
100
101     for (i = start; i < end; i++)
102     {
103       residueHash = new Hashtable();
104       maxCount = 0;
105       maxResidue = "";
106       nongap = 0;
107       values = new int[255];
108
109       for (j = 0; j < jSize; j++)
110       {
111         if (sequences[j] == null)
112         {
113           System.err
114                   .println("WARNING: Consensus skipping null sequence - possible race condition.");
115           continue;
116         }
117         seq = sequences[j].getSequence();
118         if (seq.length > i)
119         {
120           c = seq[i];
121
122           if (c == '.' || c == ' ')
123           {
124             c = '-';
125           }
126
127           if (c == '-')
128           {
129             values['-']++;
130             continue;
131           }
132           else if ('a' <= c && c <= 'z')
133           {
134             c -= 32; // ('a' - 'A');
135           }
136
137           nongap++;
138           values[c]++;
139
140         }
141         else
142         {
143           values['-']++;
144         }
145       }
146
147       for (v = 'A'; v < 'Z'; v++)
148       {
149         if (values[v] < 2 || values[v] < maxCount)
150         {
151           continue;
152         }
153
154         if (values[v] > maxCount)
155         {
156           maxResidue = String.valueOf((char) v);
157         }
158         else if (values[v] == maxCount)
159         {
160           maxResidue += String.valueOf((char) v);
161         }
162         maxCount = values[v];
163       }
164
165       if (maxResidue.length() == 0)
166       {
167         maxResidue = "-";
168       }
169       if (profile)
170       {
171         residueHash.put(PROFILE, new int[][]
172         { values, new int[]
173         { jSize, nongap } });
174       }
175       residueHash.put(MAXCOUNT, new Integer(maxCount));
176       residueHash.put(MAXRESIDUE, maxResidue);
177
178       percentage = ((float) maxCount * 100) / jSize;
179       residueHash.put(PID_GAPS, new Float(percentage));
180
181       percentage = ((float) maxCount * 100) / nongap;
182       residueHash.put(PID_NOGAPS, new Float(percentage));
183       result[i] = residueHash;
184     }
185   }
186
187   /**
188    * Compute all or part of the annotation row from the given consensus
189    * hashtable
190    * 
191    * @param consensus
192    *          - pre-allocated annotation row
193    * @param hconsensus
194    * @param iStart
195    * @param width
196    * @param ignoreGapsInConsensusCalculation
197    * @param includeAllConsSymbols
198    */
199   public static void completeConsensus(AlignmentAnnotation consensus,
200           Hashtable[] hconsensus, int iStart, int width,
201           boolean ignoreGapsInConsensusCalculation,
202           boolean includeAllConsSymbols)
203   {
204     completeConsensus(consensus, hconsensus, iStart, width,
205             ignoreGapsInConsensusCalculation, includeAllConsSymbols, null); // new
206                                                                             // char[]
207     // { 'A', 'C', 'G', 'T', 'U' });
208   }
209
210   public static void completeConsensus(AlignmentAnnotation consensus,
211           Hashtable[] hconsensus, int iStart, int width,
212           boolean ignoreGapsInConsensusCalculation,
213           boolean includeAllConsSymbols, char[] alphabet)
214   {
215     float tval, value;
216     if (consensus == null || consensus.annotations == null
217             || consensus.annotations.length < width)
218     {
219       // called with a bad alignment annotation row - wait for it to be
220       // initialised properly
221       return;
222     }
223     for (int i = iStart; i < width; i++)
224     {
225       Hashtable hci;
226       if (i >= hconsensus.length || ((hci = hconsensus[i]) == null))
227       {
228         // happens if sequences calculated over were shorter than alignment
229         // width
230         consensus.annotations[i] = null;
231         continue;
232       }
233
234       value = 0;
235       Float fv;
236       if (ignoreGapsInConsensusCalculation)
237       {
238         fv = (Float) hci.get(AAFrequency.PID_NOGAPS);
239       }
240       else
241       {
242         fv = (Float) hci.get(AAFrequency.PID_GAPS);
243       }
244       if (fv == null)
245       {
246         consensus.annotations[i] = null;
247         // data has changed below us .. give up and
248         continue;
249       }
250       value = fv.floatValue();
251       String maxRes = hci.get(AAFrequency.MAXRESIDUE).toString();
252       String mouseOver = hci.get(AAFrequency.MAXRESIDUE) + " ";
253       if (maxRes.length() > 1)
254       {
255         mouseOver = "[" + maxRes + "] ";
256         maxRes = "+";
257       }
258       int[][] profile = (int[][]) hci.get(AAFrequency.PROFILE);
259       if (profile != null && includeAllConsSymbols)
260       {
261         mouseOver = "";
262         if (alphabet != null)
263         {
264           for (int c = 0; c < alphabet.length; c++)
265           {
266             tval = profile[0][alphabet[c]] * 100f
267                     / profile[1][ignoreGapsInConsensusCalculation ? 1 : 0];
268             mouseOver += ((c == 0) ? "" : "; ") + alphabet[c] + " "
269                     + ((int) tval) + "%";
270           }
271         }
272         else
273         {
274           Object[] ca = new Object[profile[0].length];
275           float[] vl = new float[profile[0].length];
276           for (int c = 0; c < ca.length; c++)
277           {
278             ca[c] = new char[]
279             { (char) c };
280             vl[c] = profile[0][c];
281           }
282           ;
283           jalview.util.QuickSort.sort(vl, ca);
284           for (int p = 0, c = ca.length - 1; profile[0][((char[]) ca[c])[0]] > 0; c--)
285           {
286             if (((char[]) ca[c])[0] != '-')
287             {
288               tval = profile[0][((char[]) ca[c])[0]]
289                       * 100f
290                       / profile[1][ignoreGapsInConsensusCalculation ? 1 : 0];
291               mouseOver += ((p == 0) ? "" : "; ") + ((char[]) ca[c])[0]
292                       + " " + ((int) tval) + "%";
293               p++;
294
295             }
296           }
297
298         }
299       }
300       else
301       {
302         mouseOver += ((int) value + "%");
303       }
304       consensus.annotations[i] = new Annotation(maxRes, mouseOver, ' ',
305               value);
306     }
307   }
308
309   /**
310    * get the sorted profile for the given position of the consensus
311    * 
312    * @param hconsensus
313    * @return
314    */
315   public static int[] extractProfile(Hashtable hconsensus,
316           boolean ignoreGapsInConsensusCalculation)
317   {
318     int[] rtnval = new int[64];
319     int[][] profile = (int[][]) hconsensus.get(AAFrequency.PROFILE);
320     if (profile == null)
321       return null;
322     Object[] ca = new Object[profile[0].length];
323     float[] vl = new float[profile[0].length];
324     for (int c = 0; c < ca.length; c++)
325     {
326       ca[c] = new char[]
327       { (char) c };
328       vl[c] = profile[0][c];
329     }
330     ;
331     jalview.util.QuickSort.sort(vl, ca);
332     rtnval[0] = 2;
333     rtnval[1] = 0;
334     for (int c = ca.length - 1; profile[0][((char[]) ca[c])[0]] > 0; c--)
335     {
336       if (((char[]) ca[c])[0] != '-')
337       {
338         rtnval[rtnval[0]++] = ((char[]) ca[c])[0];
339         rtnval[rtnval[0]] = (int) (profile[0][((char[]) ca[c])[0]] * 100f / profile[1][ignoreGapsInConsensusCalculation ? 1
340                 : 0]);
341         rtnval[1] += rtnval[rtnval[0]++];
342       }
343     }
344     return rtnval;
345   }
346 }