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

1, -3, 5, -6, 4, 3, -16, 33, -47, 45, -10, -72, 199, -336, 401, -267, -203, 1074, -2212, 3147, -3008, 657, 4841, -13347, 22510, -26832, 17807, 13728, -72095, 148269, -210715, 201066, -43148, -325485, 895184, -1508031, 1795393, -1187571, -928282, 4839528, -9938345, 14108880

Offset

0,2

Links

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

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

Formula

a(0) = 1, a(1) = -3, a(2) = 5, a(n) = -2*a(n-1) - a(n-2) + a(n-3) for n > 2. - Jinyuan Wang, Apr 07 2020

Mathematica

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

Prog

(PARI) Vec((1-x)/(1+2*x+x^2-x^3) + O(x^50)) \\ Jinyuan Wang, Apr 07 2020

Crossrefs

Sequence in context: A236101 A203802 A306554 * A091517 A356376 A356380

Adjacent sequences: A078061 A078062 A078063 * A078065 A078066 A078067

Keyword

sign,easy

Author

N. J. A. Sloane, Nov 17 2002

Status

approved