login
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
OFFSET
1,3
COMMENTS
a(A122111(n)) differs from A001222(n) for the first time at n=64.
LINKS
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);
CROSSREFS
KEYWORD
nonn
AUTHOR
Antti Karttunen, May 11 2020
STATUS
approved