A025395 Numbers that are the sum of 3 positive cubes in exactly 1 way.

3, 10, 17, 24, 29, 36, 43, 55, 62, 66, 73, 80, 81, 92, 99, 118, 127, 129, 134, 136, 141, 153, 155, 160, 179, 190, 192, 197, 216, 218, 225, 232, 244, 253, 258, 270, 277, 281, 288, 307, 314, 342, 344, 345, 349, 352, 359, 368, 371, 375, 378, 397, 405, 408, 415, 433, 434, 440

Offset: 1

Author

David W. Wilson

Keywords

• nonn
• easy
• nice

Comments

A025456(a(n)) = 1. - Reinhard Zumkeller, Apr 23 2009

Links

• T. D. Noe, Table of n, a(n) for n = 1..1000
• Eric Weisstein's World of Mathematics, Cubic Number.
• Index entries for sequences related to sums of cubes

Crossrefs

Cf. A003072, A024981, A025321, A025396, A025403, A338667, A344188.

Programs

Mathematica

Reap[For[n = 1, n <= 500, n++, pr = Select[ PowersRepresentations[n, 3, 3], Times @@ # != 0 &]; If[pr != {} && Length[pr] == 1, Print[n, pr]; Sow[n]]]][[2, 1]] (* Jean-François Alcover, Jul 31 2013 *)