OFFSET
0,3
FORMULA
MAPLE
a := n -> convert(numtheory:-factorset(binomial(2*n, n)/(n+1)), `*`):
seq(a(n), n=0..28);
MATHEMATICA
Table[Times @@ FactorInteger[CatalanNumber[n]][[All, 1]], {n, 0, 28}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Peter Luschny, Mar 07 2017
STATUS
approved