%I #23 Feb 25 2020 16:42:03
%S 2,1,0,0,0,0,2,2,2,0,0,0,0,0,0,1,0,0,2,0,0,0,0,0,0,2,2,2,0,0,0,0,0,0,
%T 2,0,2,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,2,0,0,0,0,2,0,2,2,2,0,0,0,
%U 0,0,0,2,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
%N Number of integer solutions to x^3 + y^3 = n.
%t a[n_]:=Length[Solve[x^3 + y^3 == n, {x, y}, Integers]]; Table[a[i], {i, 10000}]
%Y Cf. A003325, A045980, A175362.
%K nonn
%O 1,1
%A _Mason Korb_, Jan 27 2020