A078064 - OEIS

%I #8 Nov 19 2021 18:52:07

%S 1,-3,5,-6,4,3,-16,33,-47,45,-10,-72,199,-336,401,-267,-203,1074,

%T -2212,3147,-3008,657,4841,-13347,22510,-26832,17807,13728,-72095,

%U 148269,-210715,201066,-43148,-325485,895184,-1508031,1795393,-1187571,-928282,4839528,-9938345,14108880

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

%H <a href="/index/Rec#order_03">Index entries for linear recurrences with constant coefficients</a>, signature (-2,-1,1).

%F 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

%t 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 *)

%o (PARI) Vec((1-x)/(1+2*x+x^2-x^3) + O(x^50)) \\ _Jinyuan Wang_, Apr 07 2020

%K sign,easy

%O 0,2

%A _N. J. A. Sloane_, Nov 17 2002