A061511 a(0) = 0; a(n) is obtained by incrementing each digit of a(n-1) by 1.
0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 21, 32, 43, 54, 65, 76, 87, 98, 109, 2110, 3221, 4332, 5443, 6554, 7665, 8776, 9887, 10998, 2110109, 32212110, 43323221, 54434332, 65545443, 76656554, 87767665, 98878776, 109989887, 211010910998
Offset: 0
Examples
Following 43: 4+1 = 5 and 3+1 = 4, hence the next term is 54.
Links
- Indranil Ghosh, Table of n, a(n) for n = 0..97
Programs
-
Mathematica
NestList[FromDigits[Flatten[IntegerDigits[IntegerDigits[#]+1]]]&,0,38] (* Jayanta Basu, May 18 2013 *)
-
PARI
A061511(n=2, a=n>0, m=1)={for(n=2, n, a=eval(concat(apply(t->Str(t+m), digits(a))))); a} \\ If only the 2nd argument is given, then the operation is applied once to that argument. - M. F. Hasler, Jun 24 2016
Comments