OFFSET
0,3
LINKS
Alois P. Heinz, Table of n, a(n) for n = 0..500
EXAMPLE
a(4)=4 because 16 produces {0,0,0,0,0,0,4}, {0,0,0,2,2,2,2}, {0,0,1,1,1,2,3}, {1,1,1,1,2,2,2}.
MATHEMATICA
Table[Length[PowersRepresentations[n^2, 7, 2]], {n, 0, 50}] (* Harvey P. Dale, Sep 08 2020 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Wouter Meeussen, Nov 18 2001
EXTENSIONS
a(0)=1 prepended by Alois P. Heinz, Feb 17 2015
Previous Mathematica program replaced by Harvey P. Dale, Sep 08 2020
STATUS
approved