登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 


A225480型
a(n)=B2(n)*C(n),其中B2(n)是广义伯努利数,C(n)是克劳森数。
1
1, 0, -2, 0, 14, 0, -62, 0, 254, 0, -5110, 0, 2828954, 0, -114674, 0, 237036478, 0, -11499383114, 0, 183092554714, 0, -3584085584926, 0, 3965530936622474, 0, -573989008898786, 0, 6375197353574922166, 0, -9251189109760413581110, 0, 33111281730973040956798, 0
抵消
0,3
评论
克劳森数C(n)是T(n,1)inA160014型.
链接
配方奶粉
设B(n,m)=和{k=0..n}和{j=0..k}和_{v=0..j}((-1)^(n-v)/(j+1))*二项式(n,k)*二项式(j,v)*(m*v)^k,则a(n)=B(n),2)*A141056号(n) ●●●●。
设B2(n)=sum_{k=0..n}((-1)^k*k/(k+1))S_{2}(n,k)其中S_{2{(n、k)是Stirling-Robenius子集数A039755号(n,k)则a(n)=B2(n)*A141056号(n) ●●●●。
例子
1/1、0/2、-2/6、0/2、14/30、0/2,-62/42、0/2和254/30、0/2的分子,-5110/66、0/2以及2828954/2730。。。(分母是克劳森数)。
MAPLE公司
B:=(n,m)->加法(加法(((-1)^(n-v)/(j+1))*二项式(n,k)*二项式(j,v)*(m*v)^k,v=0..j),j=0..k),k=0..n);
C:=进程(n)数字理论[除数](n);映射(i->i+1,%);选择(i质数,%);mul(i,i=%)结束:
A225480型:=n->B(n,2)*C(n);序列(A225480型(n) ,n=0..33);
数学
B[n_,m_]:=和[((-1)^(n-v)/(j+1))*二项式[n,k]*二项式[j,v]*如果[k==0,1,(m*v)^k],{k,0,n},{j,0,k},{v,0,j}];
c[n_]:=分母[Sum[Boole[PrimeQ[d+1]]/(d+1),{d,Divisors[n]}];
a[n]:=B[n,2]*c[n];
表[a[n],{n,0,33}](*Jean-François Alcover公司,2019年8月2日,来自枫叶*)
黄体脂酮素
@缓存函数
def欧拉数(n,k,m):#欧拉数
如果n==0:如果k==0,则返回1,否则为0
return(m*(n-k)+m-1)*欧拉数(n-1,k-1,m)+(m*k+1)*欧拉数(n-l,k,m)
@缓存函数
def B(n,m):#广义伯努利数
return add(add(欧拉数(n,j,m)*二项式(j,n-k)
对于(0..n))*(-1)^k/(k+1)中的j,对于(0..n)中的k)
定义A225480型(n) :
如果n==0:返回1
C=mul(滤波器(λs:is_prime(s),映射(λi:i+1,除数(n)))
返回C*B(n,2)
[A225480型(n) 对于(0..33)中的n
关键字
签名,压裂
作者
彼得·卢什尼2013年5月30日
状态
经核准的

查找|欢迎光临|维基|注册|音乐|地块2|演示|索引|浏览|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索|最近
OEIS社区|维护人OEIS基金会。

许可协议、使用条款、隐私政策。.

上次修改时间:2024年9月21日16:51 EDT。包含376087个序列。(在oeis4上运行。)