OFFSET
1,1
EXAMPLE
35 is in the sequence since 2^3 + 3^3 = 8 + 27 = 35, where 8 is a nonzero even cube and 27 is an odd cube.
MATHEMATICA
Table[If[Sum[Sign[Mod[i, 2] Mod[n - i + 1, 2] + Mod[i + 1, 2] Mod[n - i, 2]] (Floor[i^(1/3)] - Floor[(i - 1)^(1/3)]) (Floor[(n - i)^(1/3)] - Floor[(n - i - 1)^(1/3)]), {i, Floor[n/2]}] > 0, n, {}], {n, 1200}] // Flatten
CROSSREFS
KEYWORD
nonn
AUTHOR
Wesley Ivan Hurt, Dec 25 2020
STATUS
approved