A122518 G.f.: 1/(1 -2 x^3 - x^4 + x^5)

1, 0, 0, 2, 1, -1, 4, 4, -3, 6, 13, -6, 5, 35, -5, -9, 81, 20, -58, 158, 130, -177, 238, 476, -382, 169, 1367, -526, -520, 3285, 146, -2933, 6576, 4097, -9005, 10073, 17703, -20489, 7044, 54484, -33348, -24104, 136501, -19256, -136040, 282246, 122093, -427837, 447708, 662472

Offset

0,4

Comments

Based on characteristic polynomial x^5 - 2x^2 - x + 1.

Links

Table of n, a(n) for n=0..49.

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

Mathematica

p[x_] := x^5 - 2x^2 - x + 1 q[x_] := ExpandAll[x^5*p[1/x]] Table[ SeriesCoefficient[ Series[x/q[x], {x, 0, 50}], n], {n, 0, 50}]

Crossrefs

Cf. A006054, A006053.

Sequence in context: A322115 A294217 A123246 * A346031 A129704 A144460

Adjacent sequences: A122515 A122516 A122517 * A122519 A122520 A122521

Keyword

sign,easy

Author

Roger L. Bagula, Sep 16 2006

Extensions

Edited by N. J. A. Sloane, Oct 01 2006

Status

approved