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
Programs
-
Magma
[1] cat [(Binomial((n+1)*2^(n-1), n))/(n+1): n in [1..15]]; // Vincenzo Librandi, Nov 20 2014
-
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 *) -
PARI
a(n)=binomial((n+1)*2^(n-1),n)/(n+1)
Formula
a(n) = A136463(n)/(n+1).
Extensions
a(12) from Vincenzo Librandi, Nov 20 2014