OFFSET
0,2
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 0..200
FORMULA
G.f.: hypergeom([1/2, 1/2, 1], [2, 2], 16*x/(1-x))/(1-x).
E.g.f.: exp(x)*hypergeom([1/2, 1/2], [2, 2], 16*x).
-(n+1)^2*a(n)+(-15*n+4+19*n^2)*a(n-1)-(35*n-33)*(n-1)*a(n-2)+17*(n-1)*(n-2)*a(n-3) = 0. - Vladeta Jovovic, Jul 20 2004
a(n) ~ 17^(n+3)/(4096*Pi*n^3). - Vaclav Kotesovec, Oct 14 2012
MATHEMATICA
Table[Sum[Binomial[n, k]*(Binomial[2*k, k]/(k+1))^2, {k, 0, n}], {n, 0, 20}] (* Vaclav Kotesovec, Oct 14 2012 *)
PROG
(PARI) a(n)=sum(k=0, n, binomial(n, k)*(binomial(2*k, k)/(k+1))^2); \\ Joerg Arndt, May 10 2013
CROSSREFS
KEYWORD
nonn
AUTHOR
Vladeta Jovovic, Oct 12 2003
STATUS
approved