A380529 Smallest prime p such that p^p is a divisor of A380459(A005117(n)), or 1 if no such factor exists, where A380459(n) = Product_{d|n} A276086(n/d)^A349394(d) and A005117 lists the squarefree numbers.

1, 1, 1, 1, 1, 1, 3, 1, 1, 1, 2, 1, 1, 2, 3, 1, 1, 1, 3, 1, 2, 3, 2, 1, 1, 2, 1, 5, 1, 3, 1, 2, 1, 2, 2, 3, 1, 1, 1, 2, 3, 1, 2, 3, 1, 1, 1, 2, 5, 1, 3, 1, 2, 1, 2, 1, 2, 2, 3, 2, 1, 1, 3, 1, 2, 3, 1, 1, 3, 2, 1, 5, 2, 3, 2, 1, 2, 1, 2, 3, 1, 2, 1, 1, 3, 1, 2, 3, 2, 2, 1, 1, 1, 3, 2, 1, 1, 2, 2, 1, 2, 3, 1, 3, 1

Offset: 1

Author

Antti Karttunen, Feb 09 2025

Keywords

• nonn

Links

• Antti Karttunen, Table of n, a(n) for n = 1..39845
• Index entries for sequences related to primorial base.

Crossrefs

Cf. A005117, A129252, A276086, A349394, A380459, A380468, A380470, A380528.

Programs

PARI

for(n=1,oo,if(issquarefree(n),print1(A380528(n),", ")));

Formula

a(n) = A380528(A005117(n)) = A129252(A380459(A005117(n))).