OFFSET
1,2
COMMENTS
LINKS
Robert Price, Table of n, a(n) for n = 1..6436
MATHEMATICA
Select[Range[600], Divisible[17^#^2-1, #^3]&] (* Harvey P. Dale, Jul 19 2015 *)
PROG
(PARI) is_A177917(n)=Mod(17, n^3)^(n^2)==1 \\ M. F. Hasler, Oct 21 2012
CROSSREFS
KEYWORD
nonn
AUTHOR
Alexander Adamchuk, May 14 2010
STATUS
approved