A261636 Expansion of Product_{k>=0} 1/(1-x^(4*k+1))^4.
1, 4, 10, 20, 35, 60, 100, 160, 245, 364, 536, 780, 1115, 1564, 2166, 2980, 4065, 5484, 7326, 9720, 12830, 16824, 21902, 28344, 36510, 46820, 59736, 75844, 95910, 120844, 151688, 189668, 236330, 293564, 363542, 448804, 552425, 678144, 830338, 1014052, 1235296
Offset: 0
Keywords
Programs
-
Mathematica
nmax=50; CoefficientList[Series[Product[1/(1-x^(4*k+1))^4, {k, 0, nmax}], {x, 0, nmax}], x]
Formula
a(n) ~ exp(Pi*sqrt(2*n/3)) * 6^(1/4) * Gamma(1/4)^4 / (32 * Pi^3 * n^(1/4)).
Comments