A061748 a(0) = 1; a(n) is obtained by incrementing each digit of a(n-1) by 8.
1, 9, 17, 915, 17913, 91517911, 179139151799, 91517911179139151717, 1791391517999151791117913915915, 91517911179139151717179139151799915179111791317913
Offset: 0
Programs
-
Mathematica
NestList[FromDigits[Flatten[IntegerDigits/@(IntegerDigits[#]+8)]]&,1,10] (* Harvey P. Dale, Aug 20 2012 *)
Extensions
More terms from Larry Reeves (larryr(AT)acm.org), May 11 2001
Comments