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,2

Links

Table of n, a(n) for n=0..15.

Formula

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

Mathematica

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

Crossrefs

Cf. A127632.

Sequence in context: A221549 A289197 A174582 * A253316 A051443 A246486

Adjacent sequences: A344053 A344054 A344055 * A344057 A344058 A344059

Keyword

nonn

Author

Peter Luschny, May 12 2021

Status

approved