Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A158078
G.f. 1/( (1 + x)^7*(1 -7*x +28*x^2 -84*x^3 +210*x^4 -462*x^5 +924*x^6 -1463*x^7 +1738*x^8 -1463*x^9 +924*x^10 -462*x^11 +210*x^12 -84*x^13 +28*x^14 -7*x^15 +x^16) )
0
1, 0, 0, 0, 0, 0, 0, -253, -506, 0, 0, -1288, -1288, 0, 64009, 255530, 255783, 0, 651728, 1955184, 1303456, -16194277, -95250682, -190373347, -127639236, -247330776, -1235350424, -1976691024, 3108480705, 31420912490, 92858107023
OFFSET
0,8
REFERENCES
F. J. MacWilliams and N. J. A. Sloane, The Theory of Error-Correcting Codes, Elsevier/North Holland, 1978, p. 69, Golay C_23 weights.
FORMULA
G.f.: 1/(1 + 253*x^7 + 506*x^8 + 1288*x^11 + 1288*x^12 + 506*x^15 + 253*x^16 + x^23).
MATHEMATICA
f[x_] = 1 + 253* x^7 + 506*x^8 + 1288*x^11 + 1288*x^12 + 506*x^15 + 253*x^16 + x^23;
g[x] = ExpandAll[x^23*f[1/x]];
a = Table[SeriesCoefficient[ Series[1/g[x], {x, 0, 50}], n], {n, 0, 50}]
CROSSREFS
Sequence in context: A373916 A244168 A002289 * A157356 A203085 A245790
KEYWORD
sign
AUTHOR
Roger L. Bagula, Mar 12 2009
EXTENSIONS
Tightened redundant information - The Assoc. Eds. of the OEIS, Aug 30 2010
STATUS
approved