A346087 a(n) = min(A071178(n), A329348(n)).

0, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 2, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 3

Offset

1,4

Comments

Each term of A345941 is a power of the greatest prime factor of n, a(n) is the exponent of that term: a(n) = A100995(A345941(n)).

Values 0..5 occur for the first time at n = 1, 2, 4, 108, 324, 9375.

Links

Table of n, a(n) for n=1..108.

Index entries for sequences computed from indices in prime factorization

Index entries for sequences related to primorial base

Index entries for sequences related to primorial numbers

Formula

a(n) = min(A071178(n), A329348(n)).

a(n) = A100995(A345941(n)).

For all n >= 1, A006530(n)^a(n) = A345941(n).

Prog

(PARI)
A345941(n) = gcd(n, A329044(n));
A346087(n) = isprimepower(A345941(n)); \\ Rest of program given in A329044.

Crossrefs

Cf. A006530, A100995, A071178, A324886, A329044, A329348, A345941, A346100.

Sequence in context: A245690 A146291 A327538 * A086251 A177121 A329314

Adjacent sequences: A346084 A346085 A346086 * A346088 A346089 A346090

Keyword

nonn

Author

Antti Karttunen, Jul 07 2021

Status

approved