A103648 Expansion of -x*(2*x^11-2*x^9+3*x^7-2*x^6-x^5+x^3-x^2-1) / ((x-1)*(2*x^12+x^8-1)).

0, 1, 1, 2, 1, 1, 2, 4, 1, 2, 4, 5, 2, 4, 5, 9, 4, 5, 9, 14, 5, 9, 14, 20, 9, 14, 20, 33, 14, 20, 33, 49, 20, 33, 49, 74, 33, 49, 74, 116, 49, 74, 116, 173, 74, 116, 173, 265, 116, 173, 265, 406, 173, 265, 406, 612, 265, 406, 612, 937, 406, 612, 937, 1425, 612, 937, 1425, 2162

Offset

0,4

Links

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

Mathematica

CoefficientList[Series[-x*(2*x^11 - 2*x^9 + 3*x^7 - 2*x^6 - x^5 + x^3 - x^2 - 1)/((x - 1)*(2*x^12 + x^8 - 1)), {x, 0, 100}], x]

Crossrefs

Sequence in context: A056648 A056061 A029265 * A293176 A297170 A359627

Adjacent sequences: A103645 A103646 A103647 * A103649 A103650 A103651

Keyword

nonn,easy

Author

Roger L. Bagula, Mar 25 2005

Extensions

New name from Colin Barker, Dec 26 2012

Status

approved