OFFSET
1,1
EXAMPLE
28 is in the sequence since 1^4 + 3^3 = 1 + 27 = 28, where 0 < 1 <= 27.
MATHEMATICA
Table[If[Sum[(Floor[i^(1/4)] - Floor[(i - 1)^(1/4)]) (Floor[(n - i)^(1/3)] - Floor[(n - i - 1)^(1/3)]), {i, Floor[n/2]}] > 0, n, {}], {n, 1000}] // Flatten
CROSSREFS
KEYWORD
nonn
AUTHOR
Wesley Ivan Hurt, Dec 26 2020
STATUS
approved