OFFSET
0,2
FORMULA
G.f.: theta_3(q)^2*theta_3(q^4), where theta_3() is the Jacobi theta function. - Ilya Gutkovskiy, Aug 01 2018
MAPLE
t0:=Array(0..10000, 0); M:=15;
for i from -M to M do for j from -M to M do for k from -M to M do
t1:=i^2+j^2+4*k^2; t0[t1]:=t0[t1]+1; od: od: od:
[seq(t0[i], i=0..100)];
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, May 12 2010
STATUS
approved