|
Search: id:A122518
|
|
|
| A122518 |
|
G.f.: 1/(1 -2 x^3 - x^4 + x^5) |
|
+0
1
|
|
| 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
(list; graph; listen)
|
|
|
OFFSET
|
0,4
|
|
|
COMMENT
|
Based on characteristic polynomial x^5 - 2x^2 - x + 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: A119732 A123521 A123246 this_sequence A129704 A057785 A118686
Adjacent sequences: A122515 A122516 A122517 this_sequence A122519 A122520 A122521
|
|
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
|
