OFFSET
1,2
LINKS
Michael Somos, Table of n, a(n) for n = 1..16
FORMULA
A005149(n) = -(-1)^n * a(n).
EXAMPLE
G.f. = q + 24*q^2 + 852*q^3 + 35744*q^4 + 1645794*q^5 + 80415216*q^6 + ...
MATHEMATICA
a[ n_] := If[ n < 1, 0, SeriesCoefficient[ InverseSeries[ Series[ q / QPochhammer[ -q, q^2]^24, {q, 0, n}], q], {q, 0, n}]];
PROG
(PARI) {a(n) = if( n<1, 0, polcoeff( serreverse( x * prod( k=1, n, 1 + (-x)^k, 1 + x * O(x^n) )^24), n))};
CROSSREFS
KEYWORD
nonn
AUTHOR
Michael Somos, Sep 11 2011
STATUS
approved