OFFSET

1,2

COMMENTS

Includes the cubes themselves (since a^3 = b^3 + c^3 has no solution, by the exponent 3 case of Fermat's Last Theorem), so is different from A022555.

LINKS

Eric Weisstein's World of Mathematics, Cubic number.

MATHEMATICA

pr[n_] := Select[ PowersRepresentations[n, 2, 3], FreeQ[#, 0]& ]; Select[ Range[80], pr[#] == {} &] (* Jean-François Alcover, Nov 08 2012 *)

CROSSREFS

KEYWORD

nonn

AUTHOR

EXTENSIONS

Edited by N. J. A. Sloane, Sep 28 2007

STATUS

approved