moved util.bases into util.math
[p2pool.git] / p2pool / util / math.py
1 from __future__ import absolute_import, division
2
3 import __builtin__
4 import math
5 import random
6
7 def median(x, use_float=True):
8     # there exist better algorithms...
9     y = sorted(x)
10     if not y:
11         raise ValueError('empty sequence!')
12     left = (len(y) - 1)//2
13     right = len(y)//2
14     sum = y[left] + y[right]
15     if use_float:
16         return sum/2
17     else:
18         return sum//2
19
20 def mean(x):
21     total = 0
22     count = 0
23     for y in x:
24         total += y
25         count += 1
26     return total/count
27
28 def shuffled(x):
29     x = list(x)
30     random.shuffle(x)
31     return x
32
33 def shift_left(n, m):
34     # python: :(
35     if m >= 0:
36         return n << m
37     return n >> -m
38
39 def clip(x, (low, high)):
40     if x < low:
41         return low
42     elif x > high:
43         return high
44     else:
45         return x
46
47 def nth(i, n=0):
48     i = iter(i)
49     for _ in xrange(n):
50         i.next()
51     return i.next()
52
53 def geometric(p):
54     if p <= 0 or p > 1:
55         raise ValueError('p must be in the interval (0.0, 1.0]')
56     if p == 1:
57         return 1
58     return int(math.log1p(-random.random()) / math.log1p(-p)) + 1
59
60 def add_dicts(*dicts):
61     res = {}
62     for d in dicts:
63         for k, v in d.iteritems():
64             res[k] = res.get(k, 0) + v
65     return dict((k, v) for k, v in res.iteritems() if v)
66
67 def format(x):
68     prefixes = 'kMGTPEZY'
69     count = 0
70     while x >= 100000 and count < len(prefixes) - 2:
71         x = x//1000
72         count += 1
73     s = '' if count == 0 else prefixes[count - 1]
74     return '%i' % (x,) + s
75
76 perfect_round = lambda x: int(x + random.random())
77
78 def erf(x):
79     # save the sign of x
80     sign = 1
81     if x < 0:
82         sign = -1
83     x = abs(x)
84     
85     # constants
86     a1 =  0.254829592
87     a2 = -0.284496736
88     a3 =  1.421413741
89     a4 = -1.453152027
90     a5 =  1.061405429
91     p  =  0.3275911
92     
93     # A&S formula 7.1.26
94     t = 1.0/(1.0 + p*x)
95     y = 1.0 - (((((a5*t + a4)*t) + a3)*t + a2)*t + a1)*t*math.exp(-x*x)
96     return sign*y # erf(-x) = -erf(x)
97
98 def find_root(y_over_dy, start, steps=10, bounds=(None, None)):
99     guess = start
100     for i in xrange(steps):
101         prev, guess = guess, guess - y_over_dy(guess)
102         if bounds[0] is not None and guess < bounds[0]: guess = bounds[0]
103         if bounds[1] is not None and guess > bounds[1]: guess = bounds[1]
104         if guess == prev:
105             break
106     return guess
107
108 def ierf(z):
109     return find_root(lambda x: (erf(x) - z)/(2*math.e**(-x**2)/math.sqrt(math.pi)), 0)
110
111 try:
112     from scipy import special
113 except ImportError:
114     print 'Install SciPy for more accurate confidence intervals!'
115     def binomial_conf_interval(x, n, conf=0.95):
116         if n == 0:
117             return (1-conf)/2, 1-(1-conf)/2
118         # approximate - Wilson score interval
119         z = math.sqrt(2)*ierf(conf)
120         p = x/n
121         topa = p + z**2/2/n
122         topb = z * math.sqrt(p*(1-p)/n + z**2/4/n**2)
123         bottom = 1 + z**2/n
124         return (topa - topb)/bottom, (topa + topb)/bottom
125 else:
126     def binomial_conf_interval(x, n, conf=0.95):
127         if n == 0:
128             left = random.random()*(1 - conf)
129             return left, left + conf
130         b = special.beta(x+1, n-x+1)
131         def f(left_a):
132             left, right = max(1e-8, special.betaincinv(x+1, n-x+1, left_a)), min(1-1e-8, special.betaincinv(x+1, n-x+1, left_a + conf))
133             top = right**(x+1) * (1-right)**(n-x+1) * left*(1-left) - left**(x+1) * (1-left)**(n-x+1) * right * (1-right)
134             bottom = (x - n*right)*left*(1-left) - (x - n*left)*right*(1-right)
135             return top/bottom/b
136         left_a = find_root(f, (1-conf)/2, bounds=(0, 1-conf))
137         return special.betaincinv(x+1, n-x+1, left_a), special.betaincinv(x+1, n-x+1, left_a + conf)
138
139 def binomial_conf_center_radius(x, n, conf=0.95):
140     left, right = binomial_conf_interval(x, n, conf)
141     if n == 0:
142         return (left+right)/2, (right-left)/2
143     p = x/n
144     return p, max(p - left, right - p)
145
146 minmax = lambda x: (min(x), max(x))
147
148 def format_binomial_conf(x, n, conf=0.95, f=lambda x: x):
149     if n == 0:
150         return '???'
151     left, right = minmax(map(f, binomial_conf_interval(x, n, conf)))
152     return '~%i%% (%i-%i%%)' % (int(100*f(x/n)+1/2), int(100*left), 100-int(100-100*right))
153
154 def reversed(x):
155     try:
156         return __builtin__.reversed(x)
157     except TypeError:
158         return reversed(list(x))
159
160 class Object(object):
161     def __init__(self, **kwargs):
162         for k, v in kwargs.iteritems():
163             setattr(self, k, v)
164
165 def add_tuples(res, *tuples):
166     for t in tuples:
167         if len(t) != len(res):
168             raise ValueError('tuples must all be the same length')
169         res = tuple(a + b for a, b in zip(res, t))
170     return res
171
172 def flatten_linked_list(x):
173     while x is not None:
174         x, cur = x
175         yield cur
176
177 def weighted_choice(choices):
178     choices = list((item, weight) for item, weight in choices)
179     target = random.randrange(sum(weight for item, weight in choices))
180     for item, weight in choices:
181         if weight > target:
182             return item
183         target -= weight
184     raise AssertionError()
185
186 def natural_to_string(n, alphabet=None):
187     if n < 0:
188         raise TypeError('n must be a natural')
189     if alphabet is None:
190         s = '%x' % (n,)
191         if len(s) % 2:
192             s = '0' + s
193         return s.decode('hex')
194     else:
195         assert len(set(alphabet)) == len(alphabet)
196         res = []
197         while n:
198             n, x = divmod(n, len(alphabet))
199             res.append(alphabet[x])
200         res.reverse()
201         return ''.join(res)
202
203 def string_to_natural(s, alphabet=None):
204     if alphabet is None:
205         assert not s.startswith('\x00')
206         return int(s.encode('hex'), 16) if s else 0
207     else:
208         assert len(set(alphabet)) == len(alphabet)
209         assert not s.startswith(alphabet[0])
210         return sum(alphabet.index(char) * len(alphabet)**i for i, char in enumerate(reversed(s)))
211
212 if __name__ == '__main__':
213     import random
214     a = 1
215     while True:
216         print a, format(a) + 'H/s'
217         a = a * random.randrange(2, 5)