%I A122213
%S A122213 1,5,5,13,7,35,9,29,19,43,13,83,15,55,44,61,19,115,21,103,55,79,25,179,
%T A122213 38,89,59,129,31,269,33,125,79,113,69,271,39,125,89,223,43,335,45,183,
%U A122213 146,149,49,371,66,231,113,211,55,359,98,279,125,185,61,629,63,197,181
%N A122213 a(n) = (sum of the divisors of n)th integer from among those positive 
               integers which are coprime to n.
%H A122213 Leroy Quet, <a href="http://www.prism-of-spirals.net/">Home Page</a> 
               (listed in lieu of email address)
%e A122213 8 = 1 + 7 is the sum of the divisors of 7. 1,2,3,4,5,6,8,9,10,11,12,13,
               15,16,... are the positive integers
%e A122213 which are coprime to 7. Of these integers, 9 is the 8th. So a(7) = 9.
%t A122213 f[n_] := Block[{c = DivisorSigma[1, n], k = 0}, While[c > 0, k++; While[GCD[n, 
               k] > 1, k++ ]; c-- ]; k ]; Table[f[n], {n, 63}] (*Chandler*)
%Y A122213 Cf. A122212.
%Y A122213 Sequence in context: A098331 A061391 A123133 this_sequence A049735 A055526 
               A146984
%Y A122213 Adjacent sequences: A122210 A122211 A122212 this_sequence A122214 A122215 
               A122216
%K A122213 nonn
%O A122213 1,2
%A A122213 Leroy Quet Aug 26 2006
%E A122213 Extended by Ray Chandler (rayjchandler(AT)sbcglobal.net), Aug 29 2006