login
Expansion of Product_{k>=1} 1/(1 - (5*k-1)*x^(5*k-1)).
4

%I #5 Dec 16 2015 05:56:41

%S 1,0,0,0,4,0,0,0,16,9,0,0,64,36,14,0,256,144,137,19,1024,576,548,202,

%T 4120,2304,2192,1537,16847,9245,8768,6148,68522,37462,35106,24592,

%U 280649,153151,141382,98407,1122596,622810,572610,394796,4490428,2550289,2320167

%N Expansion of Product_{k>=1} 1/(1 - (5*k-1)*x^(5*k-1)).

%H Vaclav Kotesovec, <a href="/A265831/b265831.txt">Table of n, a(n) for n = 0..5000</a>

%F a(n) ~ c * 4^(n/4), where

%F c = 1.073840819469157289995715447280332198042213811468819293923... if mod(n,4) = 0

%F c = 0.431347264451907652131063891031332936177772975542057097666... if mod(n,4) = 1

%F c = 0.283892524489889292147114138438462508437169743150135175791... if mod(n,4) = 2

%F c = 0.139829615705558896416806329024657454417365487147024035166... if mod(n,4) = 3.

%t nmax = 40; CoefficientList[Series[Product[1/(1 - (5*k-1)*x^(5*k-1)), {k, 1, nmax}], {x, 0, nmax}], x]

%Y Cf. A067553, A265820, A265821, A265828, A265829, A265830.

%Y Cf. A265832, A265833, A265834.

%K nonn

%O 0,5

%A _Vaclav Kotesovec_, Dec 16 2015