|
%I #6 Dec 26 2023 12:29:03
%S 1,0,0,0,0,0,-264,0,0,-440,0,0,69672,0,0,232320,0,0,-18193472,0,0,
%T -91977600,0,0,4699183680,0,0,32281638400,0,0,-1199677704192,0,0,
%U -10587785894400,0,0,302398212602368,0,0,3322258906644480,0,0
%N Coefficients of polynomial expansion of Golay C_12 enumeration Polynomial: p(x)=24 + 440*x^3 + 264*x^6 + x^12; q(x)=x^12*p(1/x).
%F p(x)=24 + 440*x^3 + 264*x^6 + x^12;
%F q(x)=x^12*p(1/x);
%F a(n)=coefficients(1/q(x)).
%F G.f.: 1 / ( 1+264*x^6+440*x^9+24*x^12 ). - _R. J. Mathar_, May 24 2016
%t f[x_] = 24 + 440*x^3 + 264*x^6 + x^12;
%t g[x] = ExpandAll[x^12*f[1/x]];
%t a = Table[SeriesCoefficient[ Series[1/g[x], {x, 0, 50}], n], {n, 0, 50}]
%K sign
%O 0,7
%A _Roger L. Bagula_ and _Gary W. Adamson_, Mar 07 2009
|
