A061513 a(0) = 0; a(n) is obtained by incrementing each digit of a(n-1) by 2.
0, 2, 4, 6, 8, 10, 32, 54, 76, 98, 1110, 3332, 5554, 7776, 9998, 11111110, 33333332, 55555554, 77777776, 99999998, 1111111111111110, 3333333333333332, 5555555555555554, 7777777777777776, 9999999999999998, 11111111111111111111111111111110, 33333333333333333333333333333332
Offset: 0
Examples
Following 32; 3+2 = 5 and 2+2 = 4, hence the next term is 54.
Programs
-
Mathematica
NestList[FromDigits[Flatten[IntegerDigits/@(IntegerDigits[#]+2)]]&,0,30] (* Harvey P. Dale, Jul 07 2012 *)
-
PARI
A061513(n)=10^2^(n\5)\9*(n%5*2+1)-1 \\ M. F. Hasler, Jun 24 2016
Formula
a(n) = A061512(n)-1 = (10^2^floor(n/5)-1)/9*(n%5*2+1) - 1, where n%5 means the remainder (in {0..4}) of n divided by 5. - M. F. Hasler, Jun 24 2016
Extensions
More terms from Larry Reeves (larryr(AT)acm.org), May 11 2001
Comments