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
|
#include "cluster.hpp"
/***********************************************************************/
CompleteLinkage::CompleteLinkage(RAbundVector* rav, ListVector* lv, SparseDistanceMatrix* dm, float c, string s, float a) :
Cluster(rav, lv, dm, c, s, a)
{}
/***********************************************************************/
//This function returns the tag of the method.
string CompleteLinkage::getTag() {
return("fn");
}
/***********************************************************************/
//This function updates the distance based on the furthest neighbor method.
bool CompleteLinkage::updateDistance(PDistCell& colCell, PDistCell& rowCell) {
try {
bool changed = false;
if (colCell.dist < rowCell.dist) {
colCell.dist = rowCell.dist;
changed = true;
}
return(changed);
}
catch(exception& e) {
m->errorOut(e, "CompleteLinkage", "updateDistance");
exit(1);
}
}
/***********************************************************************/
|
