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

6, 15, 33, 60, 69, 96, 132, 177, 204, 249, 285, 312, 339, 384, 411, 447, 483, 528, 573, 609, 654, 699, 735, 780, 807, 852, 888, 915, 960, 996, 1050, 1077, 1113, 1176, 1230, 1266, 1311, 1338, 1383, 1437, 1482, 1527, 1563, 1608, 1653, 1698, 1752, 1797, 1851

Offset

1,1

Links

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

Mathematica

NestList[#+Total[IntegerDigits[#^3]]&, 6, 50] (* Harvey P. Dale, Aug 16 2011 *)

Crossrefs

Cf. A051373.

Sequence in context: A200895 A225278 A213779 * A083052 A333959 A265395

Adjacent sequences: A051407 A051408 A051409 * A051411 A051412 A051413

Keyword

nonn,base,easy,less

Author

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

Status

approved