OFFSET
1,2
LINKS
Robert Price, Table of n, a(n) for n = 1..4378
MATHEMATICA
Select[ Range[10^4], Mod[ PowerMod[ 19, #^2, #^3 ] - 1, #^3 ] == 0 &]
CROSSREFS
KEYWORD
nonn
AUTHOR
Alexander Adamchuk, May 14 2010
STATUS
approved