A335658 Numbers that are not the sum of 3 nonzero squares and a positive cube.

0, 1, 2, 3, 5, 6, 8, 9, 16, 21, 24, 40

Offset

1,3

Comments

No more terms up to 6*10^5.

Links

Table of n, a(n) for n=1..12.

Mathematica

n = 5 * 10^4.;
t = Union@Flatten@Table[x^2 + y^2 + z^2 + w^3, {x, (n/3)^(1/2)}, {y, x, ((n-x^2)/2)^(1/2)}, {z, y, (n-x^2-y^2)^(1/2)}, {w, (n-x^2-y^2-z^2)^(1/3)}];
Complement[Range[0, n], t]

Crossrefs

Cf. A000534, A004214, A297788.

Sequence in context: A358291 A117522 A299101 * A364807 A294941 A028374

Adjacent sequences: A335655 A335656 A335657 * A335659 A335660 A335661

Keyword

nonn,more

Author

XU Pingya, Jun 17 2020

Status

approved