%I A127075
%S A127075 1,2,5,11,25,67,178,287,863,2092,5612,6871,22885,53613,69597,223822,
%T A127075 385931,802877,2308019,5936156,12937623,29456690,81587807,166703456,
%U A127075 437728341,973247233,2233938123,4919445412,13784085189,14842425156
%N A127075 a(1)=1. a(n) = a(n-1) + (sum of the earlier terms {among terms a(1) through
a(n-1)} which are coprime to n).
%H A127075 Leroy Quet, <a href="http://www.prism-of-spirals.net/">Home Page</a>
(listed in lieu of email address)
%e A127075 The terms of the sequence, among terms a(1) through a(5), which are coprime
to 6 are a(1)=1, a(3)=5, a(4)=11 and a(5)=25. So a(6) = a(5) +1 +5
+11 +25 = 67.
%t A127075 f[l_List] := Append[l, l[[ -1]] + Plus @@ Select[l, GCD[ #, Length[l]
+ 1] == 1 &]];Nest[f, {1}, 30] (*Chandler*)
%Y A127075 Cf. A127076.
%Y A127075 Sequence in context: A106336 A047775 A001432 this_sequence A053429 A104237
A085945
%Y A127075 Adjacent sequences: A127072 A127073 A127074 this_sequence A127076 A127077
A127078
%K A127075 nonn
%O A127075 1,2
%A A127075 Leroy Quet Jan 04 2007
%E A127075 Extended by Ray Chandler (rayjchandler(AT)sbcglobal.net), Jan 06 2007
|