A087205 a(n) = -2*a(n-1) + 4*a(n-2), a(0)=1, a(1)=2.

1, 2, 0, 8, -16, 64, -192, 640, -2048, 6656, -21504, 69632, -225280, 729088, -2359296, 7634944, -24707072, 79953920, -258736128, 837287936, -2709520384, 8768192512, -28374466560, 91821703168, -297141272576, 961569357824, -3111703805952

Offset

0,2

Comments

Inverse binomial transform of A087204.

Links

G. C. Greubel, Table of n, a(n) for n = 0..1000

Index entries for linear recurrences with constant coefficients, signature (-2,4)

Formula

a(n) = (-1-sqrt(5))^n * (1/2-3*sqrt(5)/10) + (-1+sqrt(5))^n * (1/2+3*sqrt(5)/10).

G.f.: (4*x +1)/(-4*x^2 +2*x +1). - Joerg Arndt, Jul 14 2013

a(n+2) = A085449(n)*(-1)^(n+1); a(n+3) = A063727(n)*(-1)^n.

a(n) = -(-2)^n*F(n-2) for n >= 0, with F = A000045, and F(-1) = 1, F(-2) = -1. - Wolfdieter Lang, Oct 08 2018

Mathematica

Table[-(-2)^n*Fibonacci[n - 2], {n, 0, 50}] (* G. C. Greubel, Oct 08 2018 *)
LinearRecurrence[{-2, 4}, {1, 2}, 30] (* Harvey P. Dale, Jan 24 2022 *)

Prog

(PARI) Vec((4*x+1)/(-4*x^2+2*x+1)+O(x^66)) \\ Joerg Arndt, Jul 14 2013
(PARI) vector(50, n, n--; (-1)^(n+1)*2^n*fibonacci(n-2)) \\ G. C. Greubel, Oct 08 2018
(Magma) [(-1)^(n+1)*2^n*Fibonacci(n-2): n in [0..50]]; // G. C. Greubel, Oct 08 2018

Crossrefs

Cf. A000045, A063727, A084222, A085449, A087204.

Sequence in context: A120555 A128063 A171552 * A319196 A308536 A241682

Adjacent sequences: A087202 A087203 A087204 * A087206 A087207 A087208

Keyword

easy,sign

Author

Paul Barry, Aug 25 2003

Status

approved