|
Search: id:A122514
|
|
|
| A122514 |
|
Based on characteristic polynomial:x^4 - 2x^2 - x + 1 Coefficient expansion of:x/(1 - 2*x^2 - x^3 + x^4) |
|
+0 1
|
|
| 0, 1, 0, 2, 1, 3, 4, 5, 10, 11, 21, 27, 43, 64, 92, 144, 205, 316, 462, 693, 1035, 1532, 2301, 3406, 5099, 7581, 11303, 16855, 25088, 37432, 55728, 83097, 123800, 184490, 274969, 409683, 610628, 909845, 1355970, 2020635, 3011157, 4487395, 6686979
(list; graph; listen)
|
|
|
OFFSET
|
1,4
|
|
|
FORMULA
|
Coefficient expansion of:x/(1 - 2*x^2 - x^3 + x^4)
|
|
MATHEMATICA
|
p[x_] := x^4 - 2x^2 - x + 1 q[x_] := ExpandAll[x^4*p[1/x]] Table[ SeriesCoefficient[ Series[x/q[x], {x, 0, 50}], n], {n, 0, 50}]
|
|
CROSSREFS
|
Cf. A006054, A006053.
Sequence in context: A077159 A075379 A122512 this_sequence A130077 A080412 A098164
Adjacent sequences: A122511 A122512 A122513 this_sequence A122515 A122516 A122517
|
|
KEYWORD
|
nonn,uned
|
|
AUTHOR
|
Roger Bagula (rlbagulatftn(AT)yahoo.com), Sep 16 2006
|
|
|
Search completed in 0.002 seconds
|