A014156 Numbers that are not the sum of a nonnegative cube and a triangular number.

5, 12, 13, 17, 19, 20, 24, 25, 26, 31, 32, 34, 35, 38, 39, 40, 41, 43, 47, 49, 50, 51, 52, 54, 57, 58, 59, 60, 61, 62, 68, 69, 71, 73, 75, 76, 77, 80, 81, 83, 84, 87, 88, 89, 90, 94, 95, 96, 97, 98, 101, 102, 103, 104, 107, 108, 110, 111, 112, 114, 115, 116, 117, 122

Offset: 1

Author

N. J. A. Sloane

Keywords

• nonn

Crossrefs

Cf. A014155 (complement)

Programs

Mathematica

Complement[Range[0, 1000], Union[Flatten[Outer[Plus, Table[n^3, {n, 0, 10}], Table[n(n+1)/2, {n, 0, 50}]]]]]

Extensions

Corrected and extended by Dean Hickerson, Aug 30 2001