login
Partial products of A280246 (Product_{d|n} psi(d)).
2

%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