|
|
A304447型 |
| 乘积中x^n的系数{k>=1}((1+x^k)/(1-x^k))^(2*n)。 |
|
2
|
|
|
1、4、40、448、5264、63624、7832328、9770240、123040288、1561033348、19922193200、255472920256、3289122824000、424884885088808、550435283089088、7148519205631488、930387858449116736、1213215382135324680、15846906866928513736、207302985358274247104
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
0,2
|
|
链接
|
|
|
配方奶粉
|
a(n)~c*d^n/sqrt(n),其中d=13.43567525239504624062250428305871396096282470985065858926211428148173077464…和c=0.332527904399106979188998223666403568774227549882810268779。。。
|
|
数学
|
nmax=20;表[级数系数[乘积[(1+x^k)/(1-x^k))^(2*n),{k,1,n}],{x,0,n}],{n,0,nmax}]
nmax=20;表[级数系数[(QPochhammer[-1,x]/2/QPochharmer[x])^(2*n),{x,0,n}],{n,0,nmax}]
(*常数{d,c}:*)eq=FindRoot[{QPochhammer[-1,r*s]==2*Sqrt[s]*QPochharmer[r*s],(QPochammer[r**s]*(Log[r*s]-2*Log[1-r*s]-2*QPolyGamma[0,1,r*s))/Log[r*s]-r*Sqrt[s]*导数[0,1][QPochchammer][-1,r*s]+2*r*s*导数[0,1][Q ochhammer][r*s,r*s]==0},{r,1/12},}s,2],加工精度->1000];{N[1/r/.eq,120],val=Sqrt[((1-r*s)*Log[r*s]^2*QPochhammer[r*s])/(Pi*(2*r*s*(-1+r*s*(-导数[0,2][QPochhammer][-1,r*s]+2*Sqrt[s]*导数[0,2][QBochhammer][r*s,r*s])+QPochharmer[r*s]*(16*r*s*ArcTanh[1-2*r*s]+(1-r*s)*Log[r*s]^2-8*Log[1-r*s]+4*(-1+r*s伽马[1,1,r*s]-2*r*s*Log[r*s]*导数[0,0,1][QPolyGamma][0,1、r*s'))]/。等式;N[Chop[val],-楼层[Log[10,Abs[Im[val]]]-3]}(*瓦茨拉夫·科特索维奇2023年10月3日*)
|
|
交叉参考
|
|
|
关键词
|
非n
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|