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.
%I A318834 #6 Sep 05 2018 06:13:13
%S A318834 1,2,2,4,2,12,2,12,6,20,2,108,2,60,30,60,2,540,2,300,90,84,2,2700,10,
%T A318834 140,90,2700,2,6300,2,420,126,44,150,121500,2,132,210,10500,2,283500,
%U A318834 2,5292,3150,660,2,132300,30,5500,66,14700,2,267300,210,472500,198,1540,2,4630500,2,4620,47250,4620,350,873180,2,1452,990
%N A318834 a(n) = Product_{d|n, d<n} A019565(phi(d)), where phi is the Euler totient function A000010.
%H A318834 Antti Karttunen, <a href="/A318834/b318834.txt">Table of n, a(n) for n = 1..4096</a>
%F A318834 a(n) = Product_{d|n, d<n} A019565(A000010(d)).
%F A318834 A048675(a(n)) = A051953(n).
%o A318834 (PARI)
%o A318834 A019565(n) = {my(j,v); factorback(Mat(vector(if(n, #n=vecextract(binary(n), "-1..1")), j, [prime(j), n[j]])~))}; \\ From A019565
%o A318834 A318834(n) = { my(m=1); fordiv(n,d,if(d < n,m *= A019565(eulerphi(d)))); m; };
%Y A318834 Cf. A000010, A019565, A318835 (rgs-transform).
%Y A318834 Cf. also A293214, A293231, A300834.
%K A318834 nonn
%O A318834 1,2
%A A318834 _Antti Karttunen_, Sep 04 2018