The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A325971 a(n) is the least k >= A007947(n) such that -n + k and (n-sigma(n))+k are relatively prime. 4
 1, 2, 4, 2, 6, 7, 8, 2, 3, 11, 12, 7, 14, 15, 16, 2, 18, 7, 20, 11, 22, 23, 24, 7, 5, 27, 4, 27, 30, 31, 32, 2, 34, 35, 36, 6, 38, 39, 40, 11, 42, 43, 44, 23, 16, 47, 48, 7, 7, 10, 52, 27, 54, 7, 56, 15, 58, 59, 60, 31, 62, 63, 22, 2, 66, 67, 68, 35, 70, 71, 72, 7, 74, 75, 16, 39, 78, 79, 80, 11, 3, 83, 84, 43, 86, 87, 88, 23, 90, 31 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,2 COMMENTS a(n) is the least k >= A007947(n) such that n-k and n-(sigma(n)-k) are relatively prime. LINKS Antti Karttunen, Table of n, a(n) for n = 1..20000 FORMULA a(n) = A000203(n) - A325972(n). a(n) = n - A325970(n). PROG (PARI) A007947(n) = factorback(factorint(n)[, 1]); \\ From A007947 A325971(n) = { my(s=sigma(n)); for(i=A007947(n), s, if(1==gcd(n-i, n-(s-i)), return(i))); (0); }; A325971(n) = { my(s=sigma(n)); for(k=A007947(n), s, if(1==gcd(-n + k, (n-sigma(n))+k), return(k))); }; CROSSREFS Cf. A000203, A007947, A324213, A325817, A325961, A325965, A325970, A325972. Sequence in context: A216369 A083791 A303347 * A250222 A026251 A205721 Adjacent sequences:  A325968 A325969 A325970 * A325972 A325973 A325974 KEYWORD nonn AUTHOR Antti Karttunen, May 31 2019 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified May 8 06:39 EDT 2021. Contains 343653 sequences. (Running on oeis4.)