OFFSET
1,1
LINKS
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