A078055 Expansion of (1-x)/(1+2*x-2*x^2+2*x^3).
1, -3, 8, -24, 70, -204, 596, -1740, 5080, -14832, 43304, -126432, 369136, -1077744, 3146624, -9187008, 26822752, -78312768, 228645056, -667561152, 1949037952, -5690488320, 16614174848, -48507402240, 141624130816, -413491415808, 1207245897728, -3524722888704, 10290920404480
Offset: 0
Links
- Index entries for linear recurrences with constant coefficients, signature (-2, 2, -2).
Programs
-
Mathematica
CoefficientList[Series[(1-x)/(1+2x-2x^2+2x^3),{x,0,50}],x] (* or *) LinearRecurrence[{-2,2,-2},{1,-3,8},50] (* Harvey P. Dale, Mar 06 2013 *)
Formula
a(0)=1, a(1)=-3, a(2)=8, a(n)=-2*a(n-1)+2*a(n-2)-2*a(n-3). - Harvey P. Dale, Mar 06 2013