login
Duplicate of A004956, for n>0.
0

%I #22 Aug 10 2022 08:27:47

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

%N Duplicate of A004956, for n>0.

%C 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).

%o (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

%o (Python)

%o N = 50

%o a = [0] + [i for i in range(1, N+1)]

%o for n in range(1, N+1):

%o for j in range(n, min(n+a[n]+1, len(a))):

%o a[j] += 1

%o print(a[1:]) # _Michael S. Branicky_, Aug 10 2022

%K dead

%O 1,2

%A _Ctibor O. Zizka_, May 03 2008