OFFSET
1,2
LINKS
Seiichi Manyama, Table of n, a(n) for n = 1..1000
MATHEMATICA
Table[cnt=0; Do[If[Mod[x^8 + y^8 - z^8, n]==0, cnt++], {x, 0, n-1}, {y, 0, n-1}, {z, 0, n-1}]; cnt, {n, 50}] (* Vincenzo Librandi, Jul 18 2018 *)
PROG
(PARI) a(n)={my(p=Mod(sum(i=0, n-1, x^lift(Mod(i, n)^8)), 1-x^n)); vecsum(Vec( serconvol(lift(p^2) + O(x^n), lift(p) + O(x^n))))} \\ Andrew Howroyd, Jul 17 2018
CROSSREFS
KEYWORD
nonn,mult
AUTHOR
Seiichi Manyama, Jun 05 2017
EXTENSIONS
Keyword:mult added by Andrew Howroyd, Jul 17 2018
STATUS
approved