A136464 C((n+1)*2^(n-1),n)/(n+1).

1, 1, 5, 140, 18278, 10187344, 23427955408, 219523230207424, 8342151047514210800, 1283165334094645437430016, 797992395974041544979314144000, 2004526711813925600335978883389492224, 20319947544434703948516669537695298775460352

Offset

0,3

Links

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

Formula

a(n) = A136463(n)/(n+1).

Maple

A136464:=n->binomial((n+1)*2^(n-1), n)/(n+1): seq(A136464(n), n=0..15); # Wesley Ivan Hurt, Nov 19 2014

Mathematica

Table[Binomial[(n + 1)*2^(n - 1), n]/(n + 1), {n, 0, 15}] (* Wesley Ivan Hurt, Nov 19 2014 *)

Prog

(PARI) a(n)=binomial((n+1)*2^(n-1), n)/(n+1)
(Magma) [1] cat [(Binomial((n+1)*2^(n-1), n))/(n+1): n in [1..15]]; // Vincenzo Librandi, Nov 20 2014

Crossrefs

Cf. A136463, A136462.

Sequence in context: A054323 A061320 A193756 * A203523 A006269 A066264

Adjacent sequences: A136461 A136462 A136463 * A136465 A136466 A136467

Keyword

nonn,easy

Author

Paul D. Hanna, Dec 31 2007

Extensions

a(12) from Vincenzo Librandi, Nov 20 2014

Status

approved