|
Search: id:A100491
|
|
|
| A100491 |
|
Periodicity of the reciprocal of the Mersenne numbers (A001348). |
|
+0 1
|
|
| 1, 6, 15, 42, 44, 1365, 3855, 74898, 44620, 39672, 195225786
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
COMMENT
|
"The answer to the second question, as to whether there is a point beyond which all primes yield periods shorter than p-1, is unknown. It is widely believed that there should be infinitely many primes for which the period is exactly p-1, but at present we cannot be certain." [Ball]
|
|
REFERENCES
|
Keith Ball, Strange Curves, Counting Rabbits, and other Mathematical Explorations, Princeton University Press, Princeton and Oxford, 2003, Page 57.
|
|
MATHEMATICA
|
f[n_] := Block[{ds = Divisors[n - 1]}, p = Position[ PowerMod[10, ds, n], 1]; If[p == {}, Length[ RealDigits[1/n][[1, 1]]], Take[ds, p[[1, 1]]][[ -1]]]]; Table[ f[2^Prime[n] - 1], {n, 11}]
|
|
CROSSREFS
|
Cf. A001348.
Adjacent sequences: A100488 A100489 A100490 this_sequence A100492 A100493 A100494
Sequence in context: A083011 A114696 A106368 this_sequence A117961 A095122 A082637
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
Robert G. Wilson v (rgwv(AT)rgwv.com), Nov 22 2004
|
|
|
Search completed in 0.002 seconds
|