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,3

Comments

No more terms up to 10^6.

Links

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

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]

Crossrefs

Cf. A000534, A004214, A273915.

Sequence in context: A139791 A027563 A219729 * A000534 A136112 A127936

Adjacent sequences: A335656 A335657 A335658 * A335660 A335661 A335662

Keyword

nonn,more

Author

XU Pingya, Jun 17 2020

Status

approved