OFFSET
1,1
LINKS
Robert G. Wilson v, Table of n, a(n) for n = 1..10000 with -1 for large entries where a(n) has not yet been found [Superseded by Cariboni table]
Fausto A. C. Cariboni, Table of n, a(n) for n = 1..10000 with -1 for large entries where a(n) has not yet been found, Sep 14 2016 [With 123 new terms, this supersedes the earlier table from Robert G. Wilson v et al.]
MATHEMATICA
t = Table[0, {10000} ]; k = 1; While[ k < 4750000000, a = PowerMod[31, k, k]; If[a < 10001 && t[[a]] == 0, t[[a]] = k; Print[{a, k}]]; k++ ]; t (* Robert G. Wilson v, Aug 06 2009 *)
CROSSREFS
KEYWORD
hard,nonn
AUTHOR
Alexander Adamchuk, Feb 27 2007
EXTENSIONS
More terms from Ryan Propper, Mar 24 2007
a(494) = 14353729267 = 64609 * 222163. a(498) = 9547024387, a(540) = 29711794103. - Daniel Morel, Jun 17 2010. a(618) = 15150617101, a(750) = 13728669221. - Daniel Morel, Jun 28 2010
STATUS
approved