OFFSET
0,2
LINKS
G. C. Greubel, Table of n, a(n) for n = 0..830
FORMULA
G.f.: 4*x/(16*x+(sqrt(2)*sqrt(sqrt(1-16*x)+1)-1)*sqrt(1-16*x)-1).
a(n) = Sum_{i = 0..n} 2^i*binomial(2*n-i-1,n-i)*binomial(2*n+i-1,i)).
a(n) ~ (1+sqrt(2)) * 2^(4*n-2) / sqrt(Pi*n). - Vaclav Kotesovec, Oct 31 2014
D-finite with recurrence: n*(2*n-1)*(n-1)*a(n) -2*(n-1)*(32*n^2-64*n+39)*a(n-1) +16*(4*n-5)*(4*n-7)*(2*n-3)*a(n-2)=0. - R. J. Mathar, Jun 07 2016
MATHEMATICA
CoefficientList[Series[4 x/(16 x + Sqrt[2] Sqrt[Sqrt[1 - 16 x] + 1] Sqrt[1 - 16 x] - Sqrt[1 - 16 x] - 1), {x, 0, 40}], x] (* Vincenzo Librandi, Oct 31 2014 *)
PROG
(Maxima) a(n):=sum(2^i*binomial(2*n-i-1, n-i)*binomial(2*n+i-1, i), i, 0, n)
(PARI) a(n)=sum(i=0, n, 2^i*binomial(2*n-i-1, n-i)*binomial(2*n+i-1, i)) \\ M. F. Hasler, Oct 31 2014
CROSSREFS
KEYWORD
nonn
AUTHOR
Vladimir Kruchinin, Oct 31 2014
STATUS
approved