OFFSET
0,3
LINKS
Harvey P. Dale, Table of n, a(n) for n = 0..1000
EXAMPLE
a(10)=19 because a(9)=18, 1+8=9 and 10+9=19
MATHEMATICA
nxt[{n_, a_}]:={n+1, Total[IntegerDigits[a]]+n+1}; Transpose[NestList[nxt, {0, 0}, 70]][[2]] (* Harvey P. Dale, Jun 03 2015 *)
CROSSREFS
KEYWORD
base,easy,nonn
AUTHOR
Henry Bottomley, May 08 2000
STATUS
approved