A078041 Expansion of (1-x)/(1+x-x^2-2*x^3).
1, -2, 3, -3, 2, 1, -5, 10, -13, 13, -6, -7, 27, -46, 59, -51, 18, 49, -133, 218, -253, 205, -22, -279, 667, -990, 1099, -755, -126, 1569, -3205, 4522, -4589, 2701, 1754, -8231, 15387, -20110, 19035, -8371, -12814, 42513, -72069, 88954, -75997, 20813, 81098, -212279, 335003, -385086, 295531
Offset: 0
Links
- Index entries for linear recurrences with constant coefficients, signature (-1,1,2).
Crossrefs
First differences of A077971.
Programs
-
Mathematica
CoefficientList[Series[(1-x)/(1+x-x^2-2x^3),{x,0,60}],x] (* or *) LinearRecurrence[{-1,1,2},{1,-2,3},60] (* Harvey P. Dale, Dec 03 2018 *)