|
| |
|
|
A157876
|
|
Let f(x)=1 + x^2 + x^4 + x^5 + x^6 + x^10 + x^11; sequence has g.f. g(x)=1/(x^11*f(1/x)).
|
|
0
| |
|
|
1, -1, 1, -1, 1, -2, 2, -3, 4, -6, 9, -12, 17, -22, 30, -40, 54, -74, 100, -138, 188, -258, 352, -479, 653, -887, 1209, -1645, 2242, -3056, 4165, -5680, 7740, -10551, 14376, -19589, 26692, -36368, 49560, -67532, 92032, -125416, 170912, -232912, 317392
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,6
|
|
|
COMMENTS
| x^23+1 factors mod 2 into (x+1)*f(x)*g(x).
|
|
|
REFERENCES
| J. H. Conway and N. J. A. Sloane, "Sphere Packings, Lattices and Groups", Springer-Verlag, pp. 231.
|
|
|
MATHEMATICA
| f[x_] = 1 + x^2 + x^4 + x^5 + x^6 + x^10 + x^11;
g[x] = ExpandAll[x^11*f[1/x]];
a = Table[SeriesCoefficient[ Series[1/g[x], {x, 0, 50}], n], {n, 0, 50}]
|
|
|
CROSSREFS
| Sequence in context: A068106 A186964 A005856 * A174650 A107293 A001611
Adjacent sequences: A157873 A157874 A157875 * A157877 A157878 A157879
|
|
|
KEYWORD
| sign
|
|
|
AUTHOR
| Roger L. Bagula (rlbagulatftn(AT)yahoo.com), Mar 08 2009
|
|
|
EXTENSIONS
| Edited by N. J. A. Sloane, Sep 04 2010
|
| |
|
|
