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!)
 A334202 a(n) = A064097(n) - A323077(n). 3
 0, 1, 2, 1, 3, 2, 4, 1, 2, 3, 5, 2, 5, 4, 3, 1, 5, 2, 6, 3, 4, 5, 7, 2, 3, 5, 2, 4, 7, 3, 7, 1, 5, 5, 4, 2, 7, 6, 5, 3, 7, 4, 8, 5, 3, 7, 9, 2, 4, 3, 5, 5, 8, 2, 5, 4, 6, 7, 9, 3, 8, 7, 4, 1, 5, 5, 9, 5, 7, 4, 9, 2, 8, 7, 3, 6, 5, 5, 9, 3, 2, 7, 9, 4, 5, 8, 7, 5, 9, 3, 5, 7, 7, 9, 6, 2, 8, 4, 5, 3, 9, 5, 9, 5, 4 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,3 COMMENTS a(A122111(n)) differs from A001222(n) for the first time at n=64. LINKS Antti Karttunen, Table of n, a(n) for n = 1..65537 FORMULA a(n) = A064097(n) - A323077(n). a(n) = A064097(A006530(n)). PROG (PARI) A060681(n) = (n-if(1==n, n, n/vecmin(factor(n)[, 1]))); A064097(n) = if(1==n, 0, 1+A064097(A060681(n))); A323077(n) = if(1>=bigomega(n), 0, 1+A323077(A060681(n))); A334202(n) = (A064097(n)-A323077(n)); (PARI) A006530(n) = if(n>1, vecmax(factor(n)[, 1]), 1); A334202(n) = A064097(A006530(n)); CROSSREFS Cf. A006530, A060681, A064097, A323077. Sequence in context: A277564 A323355 A108230 * A324729 A253558 A061395 Adjacent sequences:  A334199 A334200 A334201 * A334203 A334204 A334205 KEYWORD nonn AUTHOR Antti Karttunen, May 11 2020 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 July 26 01:49 EDT 2021. Contains 346294 sequences. (Running on oeis4.)