%I A123137
%S A123137 1,2,6,42,1770,3132915,9815156397249,96337295102457969494768070,
%T A123137 9280874427658072275134580545332124401295103091525032,
%U A123137 86134630141957550628261532252390058231417831318795074704890644033088478051503964693639295413423482601219
%N A123137 a(n) = a(n-1)^2 + Sum of the digits of a(n-1), with a(1)=1.
%H A123137 A. Frank & P. Jacqueroux, <a href="http://paulcooijmans.lunarpages.com/
oth/intcontest.pdf">International Contest</a>, 2001. Item 28
%e A123137 a(5) = 42^2 + (4 + 2) = 1770
%o A123137 (PARI) a=1; for(n=1,11,print1(a,",");sda=eval(Vec(Str(a)));a=a^2+sum(i=1,
length(sda),sda[i]))
%Y A123137 Sequence in context: A061062 A152479 A115961 this_sequence A014117 A054377
A007018
%Y A123137 Adjacent sequences: A123134 A123135 A123136 this_sequence A123138 A123139
A123140
%K A123137 nonn,base
%O A123137 1,2
%A A123137 Herman Jamke (hermanjamke(AT)fastmail.fm), Sep 30 2006
|