登录
A319110型
乘积{k>=1}1/(1-(k-1)*x^k)的展开。
1
1, 0, 1, 2, 4, 6, 13, 18, 37, 56, 101, 152, 285, 410, 713, 1118, 1830, 2780, 4618, 6934, 11278, 17092, 26894, 40822, 64435, 96372, 149299, 225104, 345131, 515394, 788176, 1169962, 1772957, 2632458, 3950365, 5849260, 8748993, 12867848, 19135894, 28126614, 41598695
抵消
0,4
链接
瓦茨拉夫·科特索维奇,n=0..8190时的n,a(n)表
瓦茨拉夫·科特索维奇,渐近的闭式
配方奶粉
G.f.:exp(求和{k>=1}求和{j>=1}(j-1)^k*x^(j*k)/k)。
发件人瓦茨拉夫·科特索维奇2018年9月11日:(开始)
a(n)~c*2^(2*n/5),其中
c=28108804.2489047809604022466460350520790117596512766842168…如果mod(n,5)=0
c=28108804.0108505490802840388905319123062152339902207992657…如果mod(n,5)=1
c=28108804.0677691666257416502056436005777575601106363636106…如果mod(n,5)=2
c=28108804.083581827971851596540314974909801290757084687583764…如果mod(n,5)=3
c=28108804.058853893104368046896759214442695016905368229405793…如果mod(n,5)=4
(结束)
MAPLE公司
b: =proc(n,i)选项记住`如果`(n=0或i=1,
0^n,b(n,i-1)+(i-1)*b(n-i,min(n-i))
结束:
a: =n->b(n$2):
seq(a(n),n=0..42)#阿洛伊斯·海因茨2019年8月19日
数学
nmax=40;系数列表[系列[乘积[1/(1-(k-1)x^k),{k,1,nmax}],{x,0,nmax{],x]
nmax=40;系数列表[Series[Exp[Sum[Sum[(j-1)^k x ^(j k)/k,{j,1,nmax}],{k,1,nmax}]],{x,0,nmax}],x]
a[n]:=a[n]=如果[n==0,1,Sum[Sum[d(d-1)^(k/d),{d,除数[k]}]a[n-k],{k,1,n}]/n];表[a[n],{n,0,40}]
关键词
非n
作者
状态
经核准的