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
KEYWORD
nonn,changed
AUTHOR
Jaroslav Krizek, Jan 07 2017
STATUS
approved