Search: id:A127075 Results 1-1 of 1 results found. %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, Home Page (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 Search completed in 0.001 seconds