A157828 Expansion of 1/q(x) where q(x)=x^12*p(1/x) and p(x)=24 + 440*x^3 + 264*x^6 + x^12.

1, 0, 0, 0, 0, 0, -264, 0, 0, -440, 0, 0, 69672, 0, 0, 232320, 0, 0, -18193472, 0, 0, -91977600, 0, 0, 4699183680, 0, 0, 32281638400, 0, 0, -1199677704192, 0, 0, -10587785894400, 0, 0, 302398212602368, 0, 0, 3322258906644480, 0, 0

Offset

0,7

Links

Vincenzo Librandi, Table of n, a(n) for n = 0..1000

Formula

G.f.: 1 / ( 1+264*x^6+440*x^9+24*x^12 ). - R. J. Mathar, May 24 2016

Mathematica

CoefficientList[Series[1/(1+264*x^6+440*x^9+24*x^12), {x, 0, 50}], x] (* Vincenzo Librandi, Jan 25 2026 *)

Prog

(Magma) R<x>:=PowerSeriesRing(Rationals(), 40); Coefficients(R! 1 / ( 1+264*x^6+440*x^9+24*x^12 )); // Vincenzo Librandi, Jan 25 2026

Crossrefs

Sequence in context: A108823 A229480 A266036 * A065570 A345586 A345844

Adjacent sequences: A157825 A157826 A157827 * A157829 A157830 A157831

Keyword

sign,easy

Author

Roger L. Bagula and Gary W. Adamson, Mar 07 2009

Extensions

Name corrected by Joerg Arndt, Jan 25 2026

Status

approved