%I A126801
%S A126801 2,3,4,3,6,5,8,3,4,3,12,5,14,3,4,3,18,5,20,3,4,3,24,5,6,3,4,3,30,7,32,
               3,
%T A126801 4,3,6,5,38,3,4,3,42,5,44,3,4,3,48,5,8,3,4,3,54,5,6,3,4,3,60,7,62,3,4,
               3,
%U A126801 6,5,68,3,4,3,72,5,74,3,4,3,8,5,80,3
%N A126801 a(n) = smallest integer which is coprime to n and is > A057237(n).
%C A126801 a(n) is also the smallest positive integer m, m > 1, which is coprime 
               to n where (m-1) is not coprime to n.
%H A126801 Leroy Quet, <a href="http://www.prism-of-spirals.net/">Home Page</a> 
               (listed in lieu of email address)
%e A126801 The integers which are coprime to 9 are 1,2,4,5,7,8,10,11,13,14,... Now 
               1 and 2, but not 3, are coprime to 9, so A057237(9) = 2. The smallest 
               integer > 2 and coprime to 9 is 4. So a(9) = 4.
%p A126801 A020639 := proc(n) if n = 1 then 1 ; else min(op(numtheory[divisors](n) 
               minus {1})) ; fi ; end: A057237 := proc(n) if n = 1 then 1 ; else 
               A020639(n)-1 ; fi: end: A126801 := proc(n) local a; for a from A057237(n)+1 
               do if gcd(n,a) = 1 then RETURN(a) ; fi ; od: end: seq(A126801(n),
               n=1..80) ; - R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Nov 01 
               2007
%Y A126801 Cf. A057237.
%Y A126801 Sequence in context: A138796 A064380 A126214 this_sequence A076945 A074792 
               A048276
%Y A126801 Adjacent sequences: A126798 A126799 A126800 this_sequence A126802 A126803 
               A126804
%K A126801 nonn
%O A126801 1,1
%A A126801 Leroy Quet Feb 21 2007
%E A126801 More terms from R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Nov 01 2007