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

4, 14, 31, 59, 85, 104, 130, 149, 184, 212, 247, 275, 319, 356, 382, 428, 463, 509, 544, 590, 616, 662, 697, 743, 769, 815, 850, 869, 913, 959, 1012, 1049, 1084, 1121, 1165, 1202, 1246, 1292, 1345, 1382, 1435, 1499, 1552, 1598, 1642, 1679, 1732, 1787, 1822

Offset: 1

Author

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

Keywords

• easy
• nonn
• base

Links

• Harvey P. Dale, Table of n, a(n) for n = 1..1000

Crossrefs

Cf. A051373.

Programs

Mathematica

NestList[#+Total[IntegerDigits[#^3]]&,4,50] (* Harvey P. Dale, Jun 19 2025 *)