A022919 Multinomial coefficients(TOP, BOTTOM), where TOP = n^2, BOTTOM = ( 1 3 5 ... 2n-1 ).
1, 1, 4, 504, 5765760, 11779303536000, 7077067947620326656000, 1858415281524390197256677213184000, 296452547038365950028519606090501848174100480000, 38078735219928394229608103398446248260205826730163060269056000000
Offset: 0
Keywords
Links
- Alois P. Heinz, Table of n, a(n) for n = 0..25
Crossrefs
Cf. A022915.
Programs
-
Maple
with(combinat): a:= n-> multinomial(n^2, (2*i-1)$i=1..n, 0): seq(a(n), n=0..10); # Alois P. Heinz, Aug 05 2014
-
Mathematica
multinomial[n_, k_List] := n!/Times @@ (k!); a[n_] := multinomial[n^2, Range[1, 2n-1, 2]]; Table[a[n], {n, 0, 10}] (* Jean-François Alcover, Jan 02 2025 *)
Extensions
More terms from Vladimir Joseph Stephan Orlovsky, Dec 26 2010