A022914 Multinomial coefficients(TOP, BOTTOM), where TOP = 2^n, BOTTOM = ( C(n,0) C(n,1) C(n,2) ... C(n,n) ).
1, 2, 12, 1120, 50450400, 1387660381886338560, 58833957894412548628347941194431580569600, 54468560860672704568758301042326371229883670125439070950586847311164532855256159027200000
Offset: 0
Keywords
Links
- Alois P. Heinz, Table of n, a(n) for n = 0..10
Crossrefs
Cf. A051459.
Programs
-
Maple
with(combinat): a:= n-> multinomial(2^n, seq(binomial(n, i), i=0..n)): seq(a(n), n=0..8); # Alois P. Heinz, Sep 24 2013
-
Mathematica
Table[(2^n)!/Product[Binomial[n, k]!, {k, 0, n}], {n, 0, 8}] (* Vaclav Kotesovec, Nov 24 2023 *)
Extensions
More terms from James Sellers, May 02 2000