OFFSET
0,2
COMMENTS
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 0..300
FORMULA
G.f.: (1-4*x+(1-x)*sqrt(1-4*x))/((x+2)*(1-4*x)^(3/2)).
a(n) = Sum_{k=0..n} C(2*n-k,n+k)*2^k.
a(n) = Sum_{k=0..n} C(n+k-1,k)*A001045(n-k+1).
2*n*a(n) +3*(4-5*n)*a(n-1) +6*(4*n-7)*a(n-2) + 8*(2*n-3)*a(n-3)=0. - R. J. Mathar, Nov 14 2011
a(n) ~ 4^n/3. - Vaclav Kotesovec, Oct 20 2012
MATHEMATICA
CoefficientList[Series[(1-4*x+(1-x)*Sqrt[1-4*x])/((x+2)*(1-4*x)^(3/2)), {x, 0, 20}], x] (* Vaclav Kotesovec, Oct 20 2012 *)
PROG
(PARI) a(n) = sum(i=0, n, binomial(2*n-i, n+i)*2^i); \\ Michel Marcus, Jul 08 2021
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Paul Barry, Sep 28 2007
STATUS
approved