

A112787


Next term is the sum of previous term and the square of the sum of its decimal digits, with a(0) = 10.


0



10, 11, 15, 51, 87, 312, 348, 573, 798, 1374, 1599, 2175, 2400, 2436, 2661, 2886, 3462, 3687, 4263, 4488, 5064, 5289, 5865, 6441, 6666, 7242, 7467, 8043, 8268, 8844, 9420, 9645, 10221, 10257, 10482, 10707, 10932, 11157, 11382, 11607, 11832, 12057, 12282
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

0,1


LINKS



MATHEMATICA

a[0] = 10; a[n_] := a[n] = a[n  1] + (Plus @@ IntegerDigits@a[n  1])^2; Table[ a[n], {n, 0, 42}] (* Robert G. Wilson v, Jan 05 2006 *)


CROSSREFS



KEYWORD

nonn,base


AUTHOR

H. HINDI EL IDRISSI (latinovalentino2003(AT)yahoo.fr), Jan 03 2006


STATUS

approved



