login
Expansion of (theta_3(z)*theta_3(z)*theta_3(z)+theta_2(z)*theta_2(z)*theta_2(z))^3.
0

%I #6 Sep 29 2020 05:40:12

%S 1,0,0,24,18,0,192,288,144,512,1152,1512,672,0,3456,4704,2034,4608,

%T 8448,10440,4320,0,17856,19872,7392,18432,31104,35616,12672,0,51072,

%U 58176,22608,47616,80640,87696,34802

%N Expansion of (theta_3(z)*theta_3(z)*theta_3(z)+theta_2(z)*theta_2(z)*theta_2(z))^3.

%t Normal[Series[(EllipticTheta[3, 0, z]^3 + EllipticTheta[2, 0, z]^3)^3, {z, 0, 9}]] /. z -> z^4 // Simplify[#, z > 0]& // CoefficientList[#, z]& (* _Jean-François Alcover_, Sep 29 2020 *)

%K nonn

%O 0,4

%A _N. J. A. Sloane_.