A061747 a(0) = 0; a(n) is obtained by incrementing each digit of a(n-1) by 8.
0, 8, 16, 914, 17912, 91517910, 179139151798, 91517911179139151716, 1791391517999151791117913915914, 91517911179139151717179139151799915179111791317912
Offset: 0
Links
- Michael De Vlieger, Table of n, a(n) for n = 0..15
Programs
-
Mathematica
NestList[FromDigits@ Flatten@ Map[IntegerDigits, IntegerDigits[#] + 8] &, 0, 9] (* Michael De Vlieger, Jun 24 2016, after Harvey P. Dale at A061512 *)
-
PARI
A061747(n=2, a=if(n,8), m=8)={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
Extensions
More terms from Larry Reeves (larryr(AT)acm.org), May 11 2001
Comments