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
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65

#![allow(unused_imports)]
#![allow(dead_code)]
#[cfg(test)]

use anyhow::{Result};
use crate::{RStats,Vectors,genvec};

/*
#[test]
fn vectors() -> Result<()> { 
   let v = vec![1_f64,2.,3.,4.,5.,6.,7.,8.,9.,10.,11.,12.,13.,14.];
   let mut v2 = v.clone();
   v2.reverse();
   println!("\nThe magnitude of\n{:?} is \x1B[01;92m{}\x1B[0m",&v,&v.vmag());
   println!("\nThe scalar product of\n{:?}\n{:?} is \x1B[01;92m{}\x1B[0m",&v,&v,v.dotp(&v));
   println!("\nThe difference of\n{:?}\n{:?} is\n\x1B[01;92m{:?}\x1B[0m",&v,&v,v.vsub(&v));
   println!("\nThe distance between\n{:?}\n{:?} is\n\x1B[01;92m{:?}\x1B[0m",&v,&v2,v.vdist(&v2));
   Ok(())
}


#[test]
fn nd() -> Result<()> { 
   let mut v = vec![1_f64,2.,3.,4.,5.,6.,7.,8.,9.,10.,11.,12.,13.,14.];
   let d = v.len();
   let mut v2 = v.clone();
   v2.reverse();
   let mut v3 = v.as_slice().vsub(&v2);
   let mut v4 = v3.as_slice().smult(10.0);
   v.append(&mut v2);
   v.append(&mut v3);
   v.append(&mut v4);
   let pts = genvec(14, 20);
   println!("Medoid of pts is\n\x1B[01;92m{:?}\x1B[0m",pts.as_slice().medoid(d).unwrap());
   let v5 = vec![1_f64,1.,1.,1.,1.,1.,1.,1.,1.,1.,1.,1.,1.,1.];
   println!("Distance of {:?} to pts is\n\x1B[01;92m{:?}\x1B[0m",
      v5,pts.as_slice().distsum(d,&v5));   
   Ok(())
}
*/
#[test]
fn gm() -> Result<()> { 
   let pts = genvec(20,20);
   let (_,dist) = pts.as_slice().medoid(20).unwrap();
   println!("Sum of Medoid distances:\x1B[01;92m{}\x1B[0m",dist);
   let (ds,gm) = pts.as_slice().gmedian(20, 0.00001).unwrap();
   println!("Sum of G.M. distances:  \x1B[01;92m{}\x1B[0m\nGeometric Median:\n\x1B[01;92m{:?}\x1B[0m",ds,gm);
   Ok(())
}

/*
#[test]
fn mean() -> Result<()> { 
let v1 = vec![1_i64,2,3,4,5,6,7,8,9,10,11,12,13,14];
   println!("\nThe arithmetic mean of\n{:?} is \x1B[01;92m{}\x1B[0m",&v1,&v1.amean().unwrap());
   Ok(())
}

#[test]
fn fmean() -> Result<()> { 
   let v1 = vec![1_f64,2.,3.,4.,5.,6.,7.,8.,9.,10.,11.,12.,13.,14.];
      println!("\nThe arithmetic mean of\n{:?} is \x1B[01;92m{}\x1B[0m",&v1,&v1.amean().unwrap());
      Ok(())
   }
*/