%I#12 2018年2月23日03:40:30
%S 1、-721512、-3744、-95544、-473904、-1538784、-3947328、-8597880、-16987176、,
%电话:-30607632、-52030944、-83972448、-129500784、-19056128、-279446976、,
%电话:397468152、-544155408、-743106744、-978896160、-1296984528、-1654458624、-2139055776、-2661349824、-3370243680、-4106376504、-5113466064
%N E_2^3的q展开系数,其中E_2是A006352中显示的Eisenstein级数。
%H Seiichi Manyama,n的表格,n=0..1000时的a(n)</a>
%p带有(numtheory);M: =100;
%p E:=proc(k)局部n,t1;全球M;
%p t1:=1-(2*k/bernoulli(k))*加(σ[k-1](n)*q^n,n=1..M+1);
%p系列(t1,q,M+1);结束;
%p e2:=E(2);e4:=E(4);e6:=E(6);
%p系列(e2^3,q,M+1);
%p系列(%);
%t项=27;
%tE2[x_]=1-24*和[k*x^k/(1-x^k),{k,1,项}];
%t E2[x]^3+O[x]*条款//系数列表[#,x]&(*Jean-François Alcover_,2018年2月23日*)
%Y参考A006352。
%K符号
%0、2
%A _N.J.A.Sloane,2017年2月5日