Fixes

casr/src/bin/casr-cluster.rs

@@ -479,7 +479,7 @@ fn hierarchical_accumulation(
     // New clusters
     let mut news: HashMap<usize, Cluster> = HashMap::new();
     let mut new_num = max;
-    for &num in res.iter().skip(clusters.len()).take(deviants.len()) {
+    for &num in res.iter().skip(clusters.len()) {
         if numbers.contains_key(&num) {
             continue;
         }

libcasr/src/cluster.rs

@@ -197,15 +197,17 @@ impl Cluster {
     /// Get complete distance between cluster and report
     /// NOTE: Result also can be interpreted as diameter of cluster merge result
     pub fn dist_rep(cluster: &Cluster, report: &ReportInfo) -> f64 {
-        let mut max = 0f64;
         let (_, (trace, _)) = report;
-        for stacktrace in cluster.stacktraces() {
-            let dist = 1.0 - similarity(stacktrace, trace);
-            if dist > max {
-                max = dist;
-            }
+        if let Some(max) = cluster
+            .stacktraces()
+            .iter()
+            .map(|s| 1.0 - similarity(s, trace))
+            .max_by(|a, b| a.total_cmp(b))
+        {
+            max
+        } else {
+            0f64
         }
-        max
     }
 }
 

libcasr/src/stacktrace.rs

@@ -195,7 +195,7 @@ pub fn dedup_stacktraces(stacktraces: &[Stacktrace]) -> Vec<bool> {
 ///
 /// * `matrix` - condensed dissimilarity matrix
 ///
-/// * `len` - matrix length
+/// * `len` - number of observations that are being clustered
 ///
 /// # Return value
 ///