login
A294073
Numbers that are the sum of 2 cubes > 1.
2
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
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
KEYWORD
nonn
AUTHOR
Ilya Gutkovskiy, Feb 07 2018
STATUS
approved