login
A280714
Partial products of A055067.
1
1, 1, 2, 6, 144, 2880, 2073600, 1306368000, 17557585920000, 637129677864960000, 2312016175036366848000000, 640890883720080890265600000000, 306987758727332698566646824960000000000, 136544225638605874463902854662848512000000000000
OFFSET
1,3
COMMENTS
A055067(n) = the product of non-divisors of n.
FORMULA
a(n) = Product_{i=1..n} A055067(i).
MATHEMATICA
FoldList[#1 #2 &, Table[Times @@ Complement[Range@ n, Divisors@ n], {n, 14}]] (* Michael De Vlieger, Jan 09 2017 *)
PROG
(Magma) [&*[Factorial(k) / &*[d: d in Divisors(k)]: k in [1..n]]: n in [1..100]];
CROSSREFS
Sequence in context: A280821 A145143 A280378 * A164764 A333444 A274986
KEYWORD
nonn,changed
AUTHOR
Jaroslav Krizek, Jan 07 2017
STATUS
approved