登录
A305618型
例如对数的展开(1+Sum_{k>=1}x^prime(k)/prime(k)!).
0, 1, 1, -3, -9, 20, 190, -126, -6280, -10326, 293041, 1519320, -16985045, -194560444, 1013712777, 27317463952, -19210030599, -4305097718760, -17733269020226, 743855089334604, 7868686621862292, -132351392654695270, -2854492900112993039, 20150897206881256464
抵消
1,4
评论
的对数变换A010051型.
链接
阿洛伊斯·海因茨,n=1..472时的n,a(n)表
例子
例如:A(x)=x^2/2!+x^3/3!-3*x^4/4!-9*x^5/5!+20*x^6/6! + ...
exp(A(x))=1+x^2/2!+x^3/3!+x^5/5!+x^7/7! + ...+x^A000040型(k)/A039716号(k) +。..
exp(exp(A(x))-1)=1+x^2/2!+x^3/3!+3*x^4/4!+11*x^5/5! + ... +A190476号(k) *x^k/k! + ...
MAPLE公司
a: =proc(n)选项记忆;(t->`如果`(n=0,0,t(n)-加(a(j)*t(n-j))*
j*二项式(n,j),j=1..n-1)/n)(i->“if”(isprime(i),1,0)
结束时间:
seq(a(n),n=1..25); #阿洛伊斯·海因茨2018年12月4日
数学
nmax=24;休息[CoefficientList[Series[Log[1+Sum[x^素数[k]/Prime[k]!,{k,1,nmax}]],{x,0,nmax}],x]范围[0,nmax]!]
a[n_]:=a[n]=Boole[PrimeQ[n]]-和[k二项式[n,k]Boole[PrimeQ[n-k]]a[k],{k,1,n-1}]/n;a[0]=0;表[a[n],{n,24}]
关键词
签名
作者
状态
经核准的