|
|
A177918
|
|
Numbers k such that k^3 divides 18^(k^2) - 1.
|
|
15
|
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
17 divides a(n) for n > 1.
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[Range[350000], Mod[PowerMod[18, #^2, #^3] - 1, #^3] == 0 &] (* Julien Kluge, Sep 20 2016 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
hard,more,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|