OFFSET
1,2
COMMENTS
No other terms below 10^15. - Max Alekseyev, Nov 07 2018
Large terms: 38763675625170712166, 527929122195463909516681113715859203.
MATHEMATICA
Join[{1, 2}, Select[Range[1, 9000], Mod[13^#, #] == 11 &]] (* G. C. Greubel, Nov 20 2017 *)
Join[{1, 2}, Select[Range[10000000], PowerMod[13, #, #] == 11 &]] (* Robert Price, Apr 10 2020 *)
CROSSREFS
KEYWORD
more,nonn
AUTHOR
Zak Seidov, Feb 19 2006
EXTENSIONS
More terms from Ryan Propper, Jan 11 2008
Edited by Max Alekseyev, May 04 2010
STATUS
approved