|
%I #32 Jan 14 2024 11:47:47
%S 1,4,18,52,159,396,1004,2260,5103,10680,22260,44028,86453,163424,
%T 306288,557716,1006524,1775844,3105740,5333208,9081243,15231504,
%U 25343808,41636124,67891309,109500440,175378446,278234720,438540456,685449000,1064868020,1642037524
%N Expansion of (eta(q^3)eta(q^6)/(eta(q)eta(q^2)))^4 in powers of q.
%H Seiichi Manyama, <a href="/A284607/b284607.txt">Table of n, a(n) for n = 1..10000</a>
%F Convolution inverse of A121667.
%F a(n) ~ exp(2*Pi*sqrt(2*n/3)) / (2^(3/4) * 3^(17/4) * n^(3/4)). - _Vaclav Kotesovec_, Mar 30 2017
%t CoefficientList[Series[(QPochhammer[q^3] QPochhammer[q^6]/(QPochhammer[q] QPochhammer[q^2]))^4,{q, 0, 100}], q] (* _Indranil Ghosh_, Mar 30 2017 *)
%o (PARI) my(q='q+O('q^66)); Vec((eta(q^3)*eta(q^6)/(eta(q)*eta(q^2)))^4) \\ _Joerg Arndt_, Mar 31 2017
%Y Cf. A045484, A121667.
%K nonn
%O 1,2
%A _Seiichi Manyama_, Mar 30 2017
|
