UNPKG

algebrite

Version:

Computer Algebra System in Coffeescript

github.com/davidedc/Algebrite

davidedc/Algebrite

92 lines (67 loc) • 1.71 kB
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
test_approxratio = -> run_test [ "approxratio(0.9054054)", "67/74", "approxratio(0.0102)", "1/98", "approxratio(0.518518)", "14/27", "approxratio(0.3333)", "1/3", "approxratio(0.5)", "1/2", "approxratio(3.14159)", "355/113", "approxratio(a*3.14)", "a*22/7", "approxratio(a*b)", "a*b", "approxratio((0.5*4)^(1/3))", "2^(1/3)", "approxratio(3.14)", "22/7", # see http://davidbau.com/archives/2010/03/14/the_mystery_of_355113.html "approxratio(3.14159)", "355/113", "approxratio(-3.14159)", "-355/113", "approxratio(0)", "0", "approxratio(0.0)", "0", "approxratio(2)", "2", "approxratio(2.0)", "2", # ------------------------------- # checking some "long primes" # also called long period primes, or maximal period primes # i.e. those numbers whose reciprocal give # long repeating sequences # (long prime p gives repetition of p-1 digits). # big list here: https://oeis.org/A001913/b001913.txt # also see: https://oeis.org/A001913 # ------------------------------- # 1st long prime "approxratio(0.14)", "1/7", # 9th long prime, the biggest 2-digits long prime. # Often asked to # mental calculators to check their abilities. "approxratio(0.0103)", "1/97", # 60th long prime, the biggest 3-digits long prime. # Often asked to # mental calculators to check their abilities. "approxratio(0.001017)", "1/983", # 467th long prime, the biggest 4-digits long prime. "approxratio(0.00010033)", "1/9967", # 3617th long prime, the biggest 5-digits long prime. "approxratio(0.0000100011)", "1/99989", # 10000th long prime. "approxratio(0.00000323701)", "1/308927", ]