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

1, -3, 6, -10, 14, -16, 12, 4, -40, 104, -200, 320, -432, 464, -288, -288, 1504, -3584, 6592, -10176, 13184, -13184, 6016, 14336, -55040, 122112, -215552, 321024, -397824, 364544, -87040, -621568, 1972224, -4118528, 6993920, -10043392, 11849728, -9711616, -663552, 25026560

Offset: 0

Author

N. J. A. Sloane, Nov 17 2002

Keywords

• sign

Links

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

Programs

Mathematica

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

Formula

a(n) = A077988(n)-A077988(n-1). - R. J. Mathar, Mar 19 2025