A335659 Numbers that are not the sum of 3 nonzero squares and a positive 5th power.

0, 1, 2, 3, 5, 6, 8, 9, 11, 14, 16, 17, 21, 24, 26, 29, 32, 33, 40, 48, 64, 72, 96, 112, 144, 160, 192, 240

Offset: 1

Author

XU Pingya, Jun 17 2020

Keywords

• nonn
• more

Comments

No more terms up to 10^6.

Crossrefs

Cf. A000534, A004214, A273915.

Programs

Mathematica

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