|
|
A305620型 |
| 例如log(1+Sum_{k>=1}x^(k^2)/k^2的展开。 |
|
1
|
|
|
1, -1, 2, 0, -6, 60, -540, 3780, 12600, -199080, 3074400, -45738000, 511434000, -5621616000, 55394539200, 960323364000, -24001273296000, 498178528848000, -9994137465312000, 156104172544320000, -2076607873660320000, 18061446353670720000, 206725394268993600000
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,3
|
|
链接
|
|
|
例子
|
例如:A(x)=x-x^2/2!+2*x^3/3!-6*x^5/5!+60*x^6/6!-540*x^7/7!+。。。
exp(exp(A(x))-1)=1+x+x^2/2!+x^3/3!+7*x^4/4!+31*x^5/5!++A205801型(k) *x^k/k!+…=产品{j>=1}1/(1-x^j)^(A008836号(j) /j)。
|
|
MAPLE公司
|
N: =50:#对于(1)。。a(否)
g: =对数(1+add(x^(k^2)/k^2,k=1..楼层(sqrt(N))):
S: =系列(g,x,N+1):
seq(系数(S,x,n)*n!,n=1…n)#罗伯特·伊斯雷尔,2018年6月7日
|
|
数学
|
nmax=23;Rest[CoefficientList[Series[Log[1+Sum[x^k^2/k^2,{k,1,nmax}]],{x,0,nmax{],x]范围[0,nmax]!]
nmax=23;Rest[CoefficientList[Series[Log[1+Log[Product[1/(1-x^k)^(LiouvilleLambda[k]/k),{k,1,nmax}]],{x,0,nmax}],x]Range[0,nmax]!]
a[n_]:=a[n]=Boole[IntegerQ[n^(1/2)]](n-1)!-求和[k二项式[n,k]布尔[IntegerQ[(n-k)^(1/2)]](n-k-1)!a[k],{k,1,n-1}]/n;a[0]=0;表[a[n],{n,23}]
|
|
交叉参考
|
|
|
关键字
|
签名
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|