A047703 Numbers that are the sum of 4 but no fewer positive cubes.

4, 11, 18, 25, 30, 32, 37, 44, 51, 56, 63, 67, 70, 74, 82, 88, 89, 93, 100, 107, 108, 119, 130, 135, 137, 142, 144, 145, 149, 154, 156, 161, 163, 168, 180, 182, 187, 191, 193, 198, 200, 205, 206, 219, 226, 233, 240, 245, 252, 254, 256, 259, 261, 266, 271, 278

Offset

1,1

Links

T. D. Noe, Table of n, a(n) for n=1..1000

Mathematica

Select[Range[300], (pr = PowersRepresentations[#, 4, 3]; pr != {} && Count[pr, r_/; (Times @@ r) == 0] == 0)&] (* Jean-François Alcover, Jul 26 2011 *)

Crossrefs

Cf. A004215, A002376, A003327.

Sequence in context: A030610 A003327 A025403 * A339215 A242679 A017029

Adjacent sequences: A047700 A047701 A047702 * A047704 A047705 A047706

Keyword

nonn

Author

Arlin Anderson (starship1(AT)gmail.com)

Status

approved