%I#6 2017年1月24日09:56:49
%S 1,0,1,0,0,0,0,0,1,0,0,0,1,0,0,
%温度1,0,0,1,0,3,0,2,0,0,01,0,3,1,0,1,1,04,0,4,0,10,5,
%U 0,7,0,3,1,0,5,0,8,0,1,1,6,0,10,6
%N乘积{k>=1}的展开(1+x^(7*k-5))。
%H Vaclav Kotesovec,<a href=“/A281458/b281458.txt”>n表,n=0..10000时的a(n)</a>
%F a(n)~exp(平方(n/21)*Pi)/(2^(9/7)*21^(1/4)*n^(3/4))*(1-(3*sqrt(21)/(8*Pi_Vaclav Kotesovec_,2017年1月22日,2017年延长至1月24日
%t nmax=100;系数列表[系列[产品[(1+x^(7*k-5)),{k,1,nmax}],{x,0,nmax}],x]
%t nmax=100;poly=常量数组[0,nmax+1];poly〔〔1〕〕=1;poly[2]]=0;Do[如果[Mod[k,7]==2,Do[poly[[j+1]]+=poly[[j-k+1]],{j,nmax,k,-1}];],{k,2,nmax}];聚
%Y参见A109704、A281245、A281455、A2181456、A28145%、A280457。
%K nonn公司
%O 0.26
%A _ Vaclav Kotesovec_,2017年1月22日
|