A077945 Expansion of 1/(1-2*x+2*x^2+2*x^3).

1, 2, 2, -2, -12, -24, -20, 32, 152, 280, 192, -480, -1904, -3232, -1696, 6880, 23616, 36864, 12736, -95488, -290176, -414848, -58368, 1293312, 3533056, 4596224, -460288, -17179136, -42630144, -49981440, 19655680, 224534528, 509720576, 531060736, -406388736, -2894340096, -6038024192

Offset

0,2

Links

Table of n, a(n) for n=0..36.

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

Mathematica

CoefficientList[Series[1/(1-2x+2x^2+2x^3), {x, 0, 50}], x] (* or *) LinearRecurrence[ {2, -2, -2}, {1, 2, 2}, 50] (* Harvey P. Dale, Nov 12 2021 *)

Prog

(PARI) Vec(1/(1-2*x+2*x^2+2*x^3)+O(x^99)) \\ Charles R Greathouse IV, Sep 27 2012

Crossrefs

Cf. A077991.

Sequence in context: A152662 A135322 A106541 * A077991 A336491 A049148

Adjacent sequences: A077942 A077943 A077944 * A077946 A077947 A077948

Keyword

sign,easy

Author

N. J. A. Sloane, Nov 17 2002

Status

approved