OFFSET
1,1
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..383
EXAMPLE
For n = 6, A002110(6) = 30030, C(6,3) = 20 with squarefree kernel 10. So, a(6) = 30030/10 = 3003 = 3*7*11*13, which is also squarefree.
MATHEMATICA
a[n_] := Times @@ Prime[Range[n]] / Times @@ FactorInteger[Binomial[n, Floor[n/2]]][[;; , 1]]; Array[a, 21] (* Amiram Eldar, Mar 01 2025 *)
PROG
(PARI) a(n) = prod(k=1, n, prime(k))/factorback(factor(binomial(n, n\2))[, 1]); \\ Michel Marcus, Jul 13 2018
CROSSREFS
KEYWORD
nonn
AUTHOR
Labos Elemer, Aug 07 2000
STATUS
approved
