A294073 Numbers that are the sum of 2 cubes > 1.

16, 35, 54, 72, 91, 128, 133, 152, 189, 224, 243, 250, 280, 341, 351, 370, 407, 432, 468, 520, 539, 559, 576, 637, 686, 728, 737, 756, 793, 854, 855, 945, 1008, 1024, 1027, 1064, 1072, 1125, 1216, 1241, 1339, 1343, 1358, 1395, 1456, 1458, 1512, 1547, 1674, 1729, 1736, 1755, 1792, 1843, 1853, 1944, 2000, 2060

Offset

1,1

Links

Robert Israel, Table of n, a(n) for n = 1..10000

Index entries for sequences related to sums of cubes

Example

133 is in the sequence because 133 = 2^3 + 5^3.

Maple

N:= 3000: # to get all terms <= N
M := floor(N^(1/3)):
sort(convert(select(`<=`, {seq(seq(i^3+j^3, j = 2 .. i), i = 2 .. M)}, N), list)) # Robert Israel, Feb 08 2018

Mathematica

nmax = 2060; f[x_] := Sum[x^k^3, {k, 2, 14}]^2; Exponent[#, x] & /@ List @@ Normal[Series[f[x], {x, 0, nmax}]]

Crossrefs

Cf. A000578, A003325, A004999, A024670, A085989, A086119.

Sequence in context: A104910 A161441 A190741 * A086119 A105509 A337024

Adjacent sequences: A294070 A294071 A294072 * A294074 A294075 A294076

Keyword

nonn

Author

Ilya Gutkovskiy, Feb 07 2018

Status

approved