A055262 - OEIS

%I #5 Jun 03 2015 10:28:42

%S 0,1,3,6,10,6,12,10,9,18,19,21,15,19,24,21,19,27,27,28,30,24,28,33,30,

%T 28,36,36,37,39,42,37,42,39,46,45,45,46,48,51,46,51,48,55,54,54,55,57,

%U 60,55,60,57,64,63,63,64,66,69,73,69,75,73,72,72,73,75,78,82,78,84,82

%N n + sum of digits of a(n-1).

%H Harvey P. Dale, <a href="/A055262/b055262.txt">Table of n, a(n) for n = 0..1000</a>

%F a(n) = n+A055263(n-1) =n+A007953(a(n-1))

%e a(10)=19 because a(9)=18, 1+8=9 and 10+9=19

%t nxt[{n_,a_}]:={n+1,Total[IntegerDigits[a]]+n+1}; Transpose[NestList[nxt,{0,0},70]][[2]] (* _Harvey P. Dale_, Jun 03 2015 *)

%Y Cf. A055263.

%K base,easy,nonn

%O 0,3

%A _Henry Bottomley_, May 08 2000