Search: id:A126800 Results 1-1 of 1 results found. %I A126800 %S A126800 3,4,5,6,7,4,3,5,11,6,13,7,3,4,17,6,19,4,3,11,23,6,5,13,3,4,29,5,31,4, 3, %T A126800 17,5,6,37,19,3,4,41,6,43,4,3,23,47,6,7,5,3,4,53,6,5,4,3,29,59,10,61,31, %U A126800 3,4,5,6,67,4,3,5,71,6,73,37,3,4,7,6,79,4 %N A126800 a(n) = smallest divisor of n which is > A055874(n). %C A126800 a(n) is also the smallest divisor m, m > 1, of n where (m-1) is not a divisor of n. %H A126800 Leroy Quet, Home Page (listed in lieu of email address) %e A126800 The divisors of 12 are 1,2,3,4,6,12. A055874(12) = 4, since 1,2,3,4 are each a divisor of 12. The next higher divisor is 6. So a(12) = 6. %p A126800 A055874 := proc(n) local m; for m from 1 do if n mod m <> 0 then RETURN(m-1) ; fi ; od: end: A126800 := proc(n) local a; for a from A055874(n)+1 do if n mod a = 0 then RETURN(a) ; fi ; od: end: seq(A126800(n),n=3..80) ; - R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Nov 01 2007 %Y A126800 Cf. A055874. %Y A126800 Sequence in context: A159077 A049267 A111608 this_sequence A067628 A095254 A121857 %Y A126800 Adjacent sequences: A126797 A126798 A126799 this_sequence A126801 A126802 A126803 %K A126800 nonn %O A126800 3,1 %A A126800 Leroy Quet Feb 21 2007 %E A126800 More terms from R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Nov 01 2007 Search completed in 0.001 seconds