login
A038864
Numbers ending with '9' that are the difference of two positive cubes.
1
19, 169, 189, 279, 469, 819, 919, 999, 1519, 1899, 2169, 2189, 2269, 2619, 3159, 3169, 3429, 3789, 4069, 4219, 4849, 5409, 5419, 5489, 5859, 6669, 6769, 7839, 7999, 8269, 8379, 8749, 9919, 10439, 10449, 10719, 11349, 11529, 11719, 12159, 13669, 13699
OFFSET
1,1
LINKS
MATHEMATICA
dtcQ[n_]:=Total[Boole[Table[IntegerQ[Surd[k^3-n, 3]], {k, Floor[ Surd[ n, 3]]+1, 100}]]]>0; Select[Range[9, 14000, 10], dtcQ] (* Harvey P. Dale, Aug 31 2020 *)
CROSSREFS
Sequence in context: A215115 A142128 A158966 * A036155 A224935 A047644
KEYWORD
nonn,base
AUTHOR
EXTENSIONS
Corrected by Ray Chandler, Nov 29 2008
STATUS
approved