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

46, 74, 91, 119, 154, 182, 217, 236, 262, 308, 334, 371, 397, 434, 469, 497, 532, 578, 604, 641, 676, 722, 766, 812, 856, 884, 919, 965, 1009, 1046, 1081, 1109, 1153, 1199, 1252, 1289, 1324, 1352, 1387, 1433, 1486, 1532, 1585, 1640, 1666, 1712, 1756, 1802

Offset

1,1

Comments

Elements >= 469 can be found in A051373.

Links

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

Mathematica

NestList[#+Total[IntegerDigits[#^3]]&, 46, 50] (* Harvey P. Dale, Jun 18 2013 *)

Crossrefs

Cf. A051373.

Sequence in context: A350203 A103381 A101577 * A167283 A085434 A245372

Adjacent sequences: A051410 A051411 A051412 * A051414 A051415 A051416

Keyword

nonn,base,easy,less

Author

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

Extensions

Definition clarified by Harvey P. Dale, Jun 18 2013

Status

approved