A280115 Partial products of A175317 (Sum_{d|n} pod(d)).
1, 3, 12, 132, 792, 33264, 266112, 19958400, 618710400, 66820723200, 801848678400, 1425686950195200, 19959617302732800, 4111681164362956800, 962133392460931891200, 1057384598314564148428800, 19032922769662154671718400, 112313277263776374717810278400
Offset: 1
Keywords
Crossrefs
Programs
-
Magma
[&*[&+[&*[b: b in Divisors(d)]: d in Divisors(k)]: k in [1..n]]: n in [1..1000]]
-
Mathematica
FoldList[Times[#1, #2] &, Array[Sum[Times @@ Divisors@ d, {d, Divisors@ #}] &, 18]] (* Michael De Vlieger, Dec 26 2016 *)
Formula
a(n) = Product_{i=1..n} A175317(i).
Comments