A127362 a(n) = Sum_{k=0..n} C(n,floor(k/2))*(-3)^(n-k).
1, -2, 8, -24, 84, -272, 920, -3040, 10180, -33840, 112968, -376224, 1254696, -4181088, 13939248, -46459584, 154873860, -516229040, 1720795880, -5735921440, 19119861304, -63732624672, 212442552528, -708140901184, 2360471473384, -7868234639072
Offset: 0
Links
- Vincenzo Librandi, Table of n, a(n) for n = 0..200
Programs
-
Mathematica
CoefficientList[Series[1/(-1+2*x+2*Sqrt[1-4*x^2]), {x, 0, 20}], x] (* Vaclav Kotesovec, Feb 08 2014 *)
Formula
G.f.: (1/sqrt(1-4x^2))(1+x*c(x^2))/(1+3*x*c(x^2)).
D-finite with recurrence 3*n*a(n) +2*(5*n-3)*a(n-1) +4*(-3*n+1)*a(n-2) +40*(-n+2)*a(n-3)=0. - R. J. Mathar, Nov 15 2012
a(n) ~ (-1)^n * 2^(n+1) * 5^n / 3^(n+1). - Vaclav Kotesovec, Feb 08 2014
G.f.: 1/(-1+2*x+2*sqrt(1-4*x^2)). - Vaclav Kotesovec, Feb 08 2014
Comments