A344056 a(n) = (2*n)! * hypergeom([3/2, 2, 1-n], [3, 2 - 2*n], 4) for n >= 1 and a(0) = 1.

1, 2, 72, 3960, 354816, 47952000, 9169459200, 2363720486400, 791505727488000, 334400903553024000, 174128130895380480000, 109627479651269099520000, 82122139255681984757760000, 72210265570358144925696000000, 73668698593180294904178278400000, 86324332785379145107697958912000000

Offset: 0

Author

Peter Luschny, May 12 2021

Keywords

• nonn

Crossrefs

Cf. A127632.

Programs

Mathematica

a[n_] := (2 n)! HypergeometricPFQ[{3/2, 2, 1 - n}, {3, 2 - 2n}, 4]; a[0] := 1;
Table[a[n], {n, 0, 15}]

Formula

a(n) * Catalan(n - 1) = (2*n)! * A127632(n) for n >= 1.