%I #7 Sep 08 2022 08:46:18
%S 1,1,3,12,120,2160,45360,2903040,235146240,47029248000,2586608640000,
%T 4469659729920000,348633458933760000,307494710779576320000,
%U 553490479403237376000000,2267097003635660292096000000,308325192494449799725056000000
%N Partial products of A280246 (Product_{d|n} psi(d)).
%C psi(n) is the sum of totatives of n (A023896).
%F a(n) = Product_{i=1..n} A280246(i).
%t FoldList[#1 #2 &, Table[Product[Total@ Select[Range@ d, CoprimeQ[d, #] &], {d, Divisors@ n}], {n, 17}]] (* _Michael De Vlieger_, Dec 30 2016 *)
%o (Magma) [&*[&*[&+[h: h in [1..d] | GCD(h,d) eq 1]: d in Divisors(k)]: k in [1..n]]: n in [1..100]]
%Y Cf. A023896, A280246, A280247.
%K nonn
%O 1,3
%A _Jaroslav Krizek_, Dec 30 2016