A051414 a(n+1) = a(n) + sum of digits of a(n)^3.

145, 173, 208, 254, 289, 326, 370, 389, 442, 488, 514, 560, 586, 605, 631, 668, 712, 749, 793, 848, 883, 938, 982, 1037, 1072, 1109, 1153, 1199, 1252, 1289, 1324, 1352, 1387, 1433, 1486, 1532, 1585, 1640, 1666, 1712, 1756, 1802, 1846, 1892, 1945, 2000

Offset

1,1

Comments

Elements >= 1109 can be found in A051373.

Links

Table of n, a(n) for n=1..46.

Mathematica

NestList[#+Total[IntegerDigits[#^3]]&, 145, 50]  (* Harvey P. Dale, Jan 09 2011 *)

Crossrefs

Cf. A051373.

Sequence in context: A164770 A159777 A326258 * A176699 A177223 A318530

Adjacent sequences: A051411 A051412 A051413 * A051415 A051416 A051417

Keyword

easy,nonn,base

Author

Miklos SZABO (mike(AT)ludens.elte.hu)

Status

approved