login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

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

%I #7 Nov 21 2013 12:47:12

%S 6,15,33,60,69,96,132,177,204,249,285,312,339,384,411,447,483,528,573,

%T 609,654,699,735,780,807,852,888,915,960,996,1050,1077,1113,1176,1230,

%U 1266,1311,1338,1383,1437,1482,1527,1563,1608,1653,1698,1752,1797,1851

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

%t NestList[#+Total[IntegerDigits[#^3]]&,6,50] (* _Harvey P. Dale_, Aug 16 2011 *)

%Y Cf. A051373.

%K nonn,base,easy,less

%O 1,1

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