login
A122517
G.f.: 1/(1 - x^3 - 2 x^4 + x^5)
0
1, 0, 0, 1, 2, -1, 1, 4, 2, -3, 7, 9, -3, -1, 26, 8, -16, 27, 61, -26, -13, 131, 69, -126, 131, 344, -119, -190, 732, 438, -772, 471, 2092, -628, -1511, 3806, 3085, -4859, 1412, 12208, -2495, -11391, 19891, 20509, -28589, -396, 71682, -7462, -78083, 99479
OFFSET
0,5
COMMENTS
Based on characteristic polynomial x^5 - x^2 - 2x + 1.
MATHEMATICA
p[x_] := x^5 - x^2 - 2x + 1 q[x_] := ExpandAll[x^5*p[1/x]] Table[ SeriesCoefficient[ Series[x/q[x], {x, 0, 50}], n], {n, 0, 50}]
CROSSREFS
Sequence in context: A129033 A054090 A239456 * A256098 A177276 A123199
KEYWORD
sign
AUTHOR
Roger L. Bagula, Sep 16 2006
EXTENSIONS
Edited by N. J. A. Sloane, Oct 01 2006
STATUS
approved