OFFSET
0,3
COMMENTS
For a guide to related sequences, see A211422.
Also the number of ordered triples (w,x,y) with all terms in {1,...,n} and w^3 <= x^3 + y^3. [Note that there are no integer solutions to w^3 = x^3 + y^3, see for example Compos. Math. 140 (6) (2004) p 1399 Theorem 8.1. - R. J. Mathar, Jun 27 2012]
REFERENCES
L. Euler, Vollständige Anleitung zur Algebra, (1770), Roy. Acad. Sci., St. Petersburg.
LINKS
Michael A. Bennett, Vinayak Vatsal and Soroosh Yazdani, Ternary Diophantine equations of signature (p, p, 3), Compos. Math. 140 (6) (2004) p. 1399 Theorem 8.1.
MATHEMATICA
t = Compile[{{n, _Integer}}, Module[{s = 0},
(Do[If[w^3 < x^3 + y^3, s = s + 1],
{w, 1, #}, {x, 1, #}, {y, 1, #}] &[n]; s)]];
Map[t[#] &, Range[0, 50]] (* A211650 *)
(* Peter J. C. Moses, Apr 13 2012 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Clark Kimberling, Apr 18 2012
STATUS
approved