A055263 a(n) = Sum of digits of (n + a(n-1)).
0, 1, 3, 6, 1, 6, 3, 1, 9, 9, 10, 3, 6, 10, 6, 3, 10, 9, 9, 10, 3, 6, 10, 6, 3, 10, 9, 9, 10, 12, 6, 10, 6, 12, 10, 9, 9, 10, 12, 6, 10, 6, 12, 10, 9, 9, 10, 12, 6, 10, 6, 12, 10, 9, 9, 10, 12, 15, 10, 15, 12, 10, 9, 9, 10, 12, 15, 10, 15, 12, 10, 9, 9, 10, 12, 15, 10, 15, 12, 10, 9, 9, 10
Offset: 0
Examples
a(13)=10 because a(12)=6, 13 + 6 = 19 and 1 + 9 = 10.
Links
- Harvey P. Dale, Table of n, a(n) for n = 0..1000
Programs
-
Mathematica
nxt[{n_,a_}]:={n+1,Total[IntegerDigits[n+a+1]]}; Transpose[NestList[nxt,{0,0},90]][[2]] (* Harvey P. Dale, Aug 11 2016 *)
Extensions
More terms from Paolo P. Lava, Jul 31 2007
Comments