A138097 Duplicate of A004956, for n>0.

1, 3, 4, 6, 8, 9, 11, 13, 15, 17, 18, 20, 22, 23, 25, 28, 30

Offset

1,2

Comments

Previous name was: Limiting sequence when we start with positive integers (A000027) and at step n >= 1 add 1 to each term from position n to position n + a(n).

Links

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

Prog

(PARI) lista(nn) = my(va = [1..nn]); for (k=1, nn, for (i=k, k+va[k], if (i<= #va, va[i]++); ); ); va; \\ Michel Marcus, Aug 07 2022
(Python)
N = 50
a = [0] + [i for i in range(1, N+1)]
for n in range(1, N+1):
    for j in range(n, min(n+a[n]+1, len(a))):
        a[j] += 1
print(a[1:]) # Michael S. Branicky, Aug 10 2022

Crossrefs

Sequence in context: A285681 A133280 A280762 * A193732 A000592 A138924

Adjacent sequences: A138094 A138095 A138096 * A138098 A138099 A138100

Keyword

dead

Author

Ctibor O. Zizka, May 03 2008

Status

approved