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
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
use std::fmt;
pub fn wsum(n: usize) -> f64 {
(n * (n + 1)) as f64 / 2.
}
pub fn emsg(file: &'static str, line: u32, msg: &'static str) -> String {
format!("{}:{} rstats {}", file, line, msg)
}
pub fn genvec(d: usize, n: usize, s1: u32, s2: u32) -> Vec<Vec<f64>> {
if n * d < 1 {
panic!("{}",emsg(
file!(),
line!(),
"genvec given zero or wrong dimensions"
))
}
let mut m_z = s1 as u32;
let mut m_w = s2 as u32;
let mut rand = || {
m_z = 36969 * (m_z & 65535) + (m_z >> 16);
m_w = 18000 * (m_w & 65535) + (m_w >> 16);
(((m_z << 16) & m_w) as f64 + 1.0) * 2.328306435454494e-10
};
let mut v: Vec<Vec<f64>> = Vec::with_capacity(n);
for _i in 0..n {
let mut pt = Vec::with_capacity(d);
for _j in 0..d {
pt.push(rand())
}
v.push(pt)
}
return v;
}
pub fn genvecu8(d: usize, n: usize, s1: u32, s2: u32) -> Vec<Vec<u8>> {
if n * d < 1 {
panic!("{}",emsg(
file!(),
line!(),
"genvecu8 given zero or wrong dimensions"
))
}
let mut m_z = s1 as u32;
let mut m_w = s2 as u32;
let mut rand = || {
m_z = 36969 * (m_z & 65535) + (m_z >> 16);
m_w = 18000 * (m_w & 65535) + (m_w >> 16);
(256.0*(((m_z << 16) & m_w) as f32 + 1.0)*2.328306435454494e-10).floor() as u8
};
let mut v: Vec<Vec<u8>> = Vec::with_capacity(n);
for _i in 0..n {
let mut pt = Vec::with_capacity(d);
for _j in 0..d {
pt.push(rand())
}
v.push(pt)
}
return v;
}
pub struct GI<T: fmt::Display>(pub T);
impl<T: fmt::Display> fmt::Display for GI<T> {
fn fmt(&self, f: &mut fmt::Formatter) -> fmt::Result {
write!(f, "\x1B[01;92m{}\x1B[0m", self.0.to_string())
}
}
pub struct GV<T: fmt::Display>(pub Vec<T>);
impl<T: fmt::Display> fmt::Display for GV<T> {
fn fmt(&self, f: &mut fmt::Formatter) -> fmt::Result {
let mut s = String::from("\x1B[01;92m[");
let n = self.0.len();
if n > 0 {
s.push_str(&self.0[0].to_string());
for i in 1..n {
s.push_str(", ");
s.push_str(&self.0[i].to_string());
}
}
write!(f, "{}]\x1B[0m", s)
}
}