cp's OEIS Frontend

A329350 a(n) = Product_{d|n} A276086(d)^A010051(n/d).

%I A329350 #6 Nov 12 2019 19:20:06
%S A329350 1,2,2,3,2,18,2,9,6,54,2,45,2,30,108,15,2,150,2,405,60,270,2,375,18,
%T A329350 150,30,675,2,33750,2,225,540,1350,180,3125,2,750,300,5625,2,281250,2,
%U A329350 10125,4500,6750,2,140625,10,56250,2700,16875,2,468750,1620,84375,1500,33750,2,65625,2,42,22500,21,900,236250,2,567,13500,425250,2,21875
%N A329350 a(n) = Product_{d|n} A276086(d)^A010051(n/d).
%H A329350 Antti Karttunen, <a href="/A329350/b329350.txt">Table of n, a(n) for n = 1..8192</a>
%F A329350 a(n) = Product_{d|n} A276086(d)^A010051(n/d).
%F A329350 A276085(a(n)) = A069359(n).
%o A329350 (PARI)
%o A329350 A276086(n) = { my(m=1, p=2); while(n, m *= (p^(n%p)); n = n\p; p = nextprime(1+p)); (m); };
%o A329350 A329350(n) = { my(m=1); fordiv(n,d,if(isprime(n/d), m *= A276086(d))); (m); };
%Y A329350 Cf. A010051, A069359, A276085, A276086, A329351 (rgs-transform).
%Y A329350 Cf. also A329352, A329380.
%K A329350 nonn
%O A329350 1,2
%A A329350 _Antti Karttunen_, Nov 12 2019