|
Search: id:A122517
|
|
|
| A122517 |
|
G.f.: 1/(1 - x^3 - 2 x^4 + x^5) |
|
+0
1
|
|
| 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
(list; graph; listen)
|
|
|
OFFSET
|
0,5
|
|
|
COMMENT
|
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
|
Cf. A006054, A006053.
Adjacent sequences: A122514 A122515 A122516 this_sequence A122518 A122519 A122520
Sequence in context: A127420 A129033 A054090 this_sequence A123199 A112096 A026725
|
|
KEYWORD
|
sign
|
|
AUTHOR
|
Roger Bagula (rlbagulatftn(AT)yahoo.com), Sep 16 2006
|
|
EXTENSIONS
|
Edited by njas, Oct 01 2006
|
|
|
Search completed in 0.002 seconds
|
