A022589 Expansion of Product_{m>=1} (1 + q^m)^25.

1, 25, 325, 2950, 21100, 126905, 667850, 3157725, 13667175, 54900675, 206841715, 736953800, 2499500175, 8113694575, 25320834800, 76253908740, 222308896150, 629146702350, 1732518057650, 4651937973250, 12201443983695, 31311905220800, 78732034002275, 194220161393825

Offset

0,2

Links

G. C. Greubel, Table of n, a(n) for n = 0..1000

Formula

a(n) ~ sqrt(5) * exp(5 * Pi * sqrt(n/3)) / (16384 * 3^(1/4) * n^(3/4)). - Vaclav Kotesovec, Mar 05 2015

Mathematica

nmax=50; CoefficientList[Series[Product[(1+q^m)^25, {m, 1, nmax}], {q, 0, nmax}], q] (* Vaclav Kotesovec, Mar 05 2015 *)

Prog

(PARI) m=50; q='q+O('q^m); Vec(prod(n=1, m, (1+q^n)^25)) \\ G. C. Greubel, Feb 25 2018
(Magma) Coefficients(&*[(1+x^m)^25:m in [1..40]])[1..40] where x is PolynomialRing(Integers()).1; // G. C. Greubel, Feb 25 2018

Crossrefs

Column k=25 of A286335.

Sequence in context: A079875 A162702 A010977 * A344656 A199657 A094730

Adjacent sequences: A022586 A022587 A022588 * A022590 A022591 A022592

Keyword

nonn

Author

N. J. A. Sloane

Extensions

Terms a(20) onward added by G. C. Greubel, Feb 25 2018

Status

approved