%I #5 Oct 03 2018 21:35:48
%S 1,2,2,6,2,36,2,54,12,108,2,1620,2,60,216,810,2,5400,2,43740,120,540,
%T 2,607500,36,300,360,40500,2,21870000,2,182250,1080,2700,360,
%U 151875000,2,1500,600,246037500,2,101250000,2,5467500,972000,13500,2,85429687500,20,6075000,5400,5062500,2,2531250000,3240,3417187500,3000,67500,2
%N a(n) = Product_{d|n, d<n} A276086(d).
%H Antti Karttunen, <a href="/A319708/b319708.txt">Table of n, a(n) for n = 1..2310</a>
%H <a href="/index/Pri#primorialbase">Index entries for sequences related to primorial base</a>
%F a(n) = Product_{d|n, d<n} A276086(d).
%F For all n >= 1:
%F A276085(a(n)) = A001065(n).
%F A001222(a(n)) = A319713(n).
%o (PARI)
%o A276086(n) = { my(i=0,m=1,pr=1,nextpr); while((n>0),i=i+1; nextpr = prime(i)*pr; if((n%nextpr),m*=(prime(i)^((n%nextpr)/pr));n-=(n%nextpr));pr=nextpr); m; };
%o A319708(n) = { my(m=1); fordiv(n, d, if(d<n, m *= A276086(d))); (m); };
%Y Cf. A276085, A276086, A319709 (rgs-transform).
%Y Cf. A293214, A293221, A293222, A300834 for similar constructions for other bases.
%K nonn
%O 1,2
%A _Antti Karttunen_, Oct 03 2018
|