A396056 Numbers not of the form Sum_{k=1..m} floor(m/k^4).

16, 33, 50, 67, 84, 86, 102, 119, 136, 153, 170, 173, 188, 205, 222, 239, 256, 260, 274, 275, 292, 309, 326, 343, 348, 361, 378, 395, 412, 429, 435, 447, 464, 481, 498, 515, 522, 533, 550, 551, 568, 585, 602, 610, 620, 637, 654, 671, 673, 689, 698, 707, 724

Offset

1,1

Comments

Complement of A013938.

Links

Chai Wah Wu, Table of n, a(n) for n = 1..10000

Mathematica

Complement[Range[Last[#]], #] &@ Table[Sum[Floor[n/k^4], {k, n}], {n, 700}] (* Michael De Vlieger, May 16 2026 *)

Prog

(Python)
# uses Python function from A013938
from itertools import count, islice
def A396056_gen(): # generator of terms
    c = 0
    for i in count(0):
        if (m:=A013938(i))!=i+c:
            for j in range(i+c, m):
                yield j
            c = m-i
A396056_list = list(islice(A396056_gen(), 60))

Crossrefs

Cf. A013938, A396046.

Sequence in context: A095784 A041502 A041500 * A361692 A132758 A195146

Adjacent sequences: A396053 A396054 A396055 * A396057 A396058 A396059

Keyword

nonn

Author

Chai Wah Wu, May 14 2026

Status

approved