A334202 a(n) = A064097(n) - A323077(n).

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

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: A363942 A363487 A108230 * A324729 A355532 A364192

Adjacent sequences: A334199 A334200 A334201 * A334203 A334204 A334205

Keyword

nonn

Author

Antti Karttunen, May 11 2020

Status

approved