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

1, 5, 14, 36, 83, 182, 382, 778, 1546, 3013, 5778, 10932, 20447, 37867, 69526, 126690, 229309, 412570, 738308, 1314824, 2331218, 4116731, 7243092, 12700680, 22201165, 38696513, 67267550, 116642832, 201791063, 348339614, 600095386, 1031830006

Offset: 0

Author

R. J. Mathar, Aug 08 2015

Keywords

• nonn
• easy

Comments

Third column of A228815.

Links

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

Crossrefs

Cf. A228815.

Programs

Mathematica

CoefficientList[Series[(-1 - 2 x + x^2 + x^3)/(x^2 + x - 1)^3, {x, 0, 40}], x] (* or *) LinearRecurrence[{3,0,-5,0,3,1},{1,5,14,36,83,182},40] (* Harvey P. Dale, Nov 21 2018 *)

Formula

a(n) = A001628(n) +2*A001628(n-1) -A001628(n-2) -A001628(n-3).