cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A319708 a(n) = Product_{d|n, d A276086(d).

This page as a plain text file.
%I A319708 #5 Oct 03 2018 21:35:48
%S A319708 1,2,2,6,2,36,2,54,12,108,2,1620,2,60,216,810,2,5400,2,43740,120,540,
%T A319708 2,607500,36,300,360,40500,2,21870000,2,182250,1080,2700,360,
%U A319708 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 A319708 a(n) = Product_{d|n, d<n} A276086(d).
%H A319708 Antti Karttunen, <a href="/A319708/b319708.txt">Table of n, a(n) for n = 1..2310</a>
%H A319708 <a href="/index/Pri#primorialbase">Index entries for sequences related to primorial base</a>
%F A319708 a(n) = Product_{d|n, d<n} A276086(d).
%F A319708 For all n >= 1:
%F A319708 A276085(a(n)) = A001065(n).
%F A319708 A001222(a(n)) = A319713(n).
%o A319708 (PARI)
%o A319708 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 A319708(n) = { my(m=1); fordiv(n, d, if(d<n, m *= A276086(d))); (m); };
%Y A319708 Cf. A276085, A276086, A319709 (rgs-transform).
%Y A319708 Cf. A293214, A293221, A293222, A300834 for similar constructions for other bases.
%K A319708 nonn
%O A319708 1,2
%A A319708 _Antti Karttunen_, Oct 03 2018