login
a(n) = A069359(A181819(n)).
2

%I #10 Apr 03 2022 13:53:51

%S 0,1,1,1,1,2,1,1,1,2,1,5,1,2,2,1,1,5,1,5,2,2,1,7,1,2,1,5,1,4,1,1,2,2,

%T 2,3,1,2,2,7,1,4,1,5,5,2,1,9,1,5,2,5,1,7,2,7,2,2,1,10,1,2,5,1,2,4,1,5,

%U 2,4,1,8,1,2,5,5,2,4,1,9,1,2,1,10,2,2,2,7,1,10,2,5,2,2,2,13,1,5,5,3,1,4,1,7,4

%N a(n) = A069359(A181819(n)).

%H Antti Karttunen, <a href="/A351943/b351943.txt">Table of n, a(n) for n = 1..20000</a>

%H <a href="/index/Eu#epf">Index entries for sequences computed from exponents in factorization of n</a>

%o (PARI)

%o A069359(n) = (n*sumdiv(n, d, isprime(d)/d)); \\ From A069359

%o A181819(n) = factorback(apply(e->prime(e),(factor(n)[,2])));

%o A351943(n) = A069359(A181819(n));

%Y Cf. A069359, A181819.

%Y Coincides with A351942 on the positions given by A130091.

%K nonn

%O 1,6

%A _Antti Karttunen_, Apr 02 2022