File: kimura.cpp

package info (click to toggle)
mothur 1.48.1-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 13,692 kB
  • sloc: cpp: 161,866; makefile: 122; sh: 31
file content (49 lines) | stat: -rw-r--r-- 1,428 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
//
//  kimura.cpp
//  Mothur
//
//  Created by Sarah Westcott on 7/2/21.
//  Copyright © 2021 Schloss Lab. All rights reserved.
//

#include "kimura.hpp"

/***********************************************************************/

double Kimura::calcDist(Protein A, Protein B) {
    try {
        int numBases = A.getAlignLength();
        vector<AminoAcid> seqA = A.getAligned();
        vector<AminoAcid> seqB = B.getAligned();
        
        int lm = 0; int n = 0;
        
        for (int i = 0; i < numBases; i++) {
            int numA = seqA[i].getNum();
            int numB = seqB[i].getNum();
          
            if ((((long)numA <= (long)val) || ((long)numA == (long)ser)) && (((long)numB <= (long)val) || ((long)numB == (long)ser))) {
                if (numA == numB) { lm++; }
                n++;
            }
        }
        
        double p = 1 - (double)lm / n;
        double dp = 1.0 - p - 0.2 * p * p;
        
        if (dp < 0.0) {
            m->mothurOut("[WARNING]: DISTANCE BETWEEN SEQUENCES " + A.getName() + " AND " + B.getName() + " IS TOO LARGE FOR KIMURA FORMULA, setting distance to -1.0.\n");
            dist = -1.0;
        } else {
            dist = -log(dp);
        }
        
        return dist;
    }
    catch(exception& e) {
        m->errorOut(e,  "Kimura", "calcDist");
        exit(1);
    }
}
/***********************************************************************/