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

 


A261013型
行读取的不规则三角形:T(n,k)=将n划分为素数部分的次数,其中最大部分是第k个素数。
2
0, 1, 0, 1, 1, 0, 0, 1, 1, 1, 1, 0, 0, 1, 1, 1, 1, 1, 1, 0, 0, 2, 1, 1, 1, 1, 2, 1, 0, 2, 2, 1, 1, 1, 2, 2, 2, 0, 0, 2, 3, 2, 1, 1, 1, 2, 3, 3, 1, 0, 0, 3, 4, 3, 1, 1, 1, 2, 4, 4, 2, 1, 0, 3, 5, 5, 2, 1, 1, 1, 3, 5, 5, 3, 2, 0, 0, 3, 6, 7, 3, 2, 1, 1, 1, 3, 7, 7, 4, 3, 1, 0
抵消
1,22
链接
阿洛伊斯·海因茨,行n=1..500,扁平
O.P.Gupta和S.Luthra,素数分区,程序。自然科学研究所。印度。第A.21部分(1955年),181-184。
例子
三角形开始:
0,
1,
0,1,
1,0,
0,1,1,
1,1,0,
0,1,1,1,
1,1,1,0,
0,2,1,1,
1,1,2,1,
...
MAPLE公司
带有(数字理论):
b: =proc(n,i)选项记忆`如果`(n=0,1,`如果`(i<1,0,
b(n,i-1)+(p->`如果`(p>n,0,b(n-p,i)))(ithprime(i))
结束时间:
T: =n->`如果'(n=1,0,seq(b(n-ithprime(k),k),k=1..pi(n)):
seq(T(n),n=1..25)#阿洛伊斯·海因茨2015年8月16日
数学
b[n_,i_]:=b[n,i]=如果[n==0,1,如果[i<1,0,b[n、i-1]+函数[p,如果[p>n,0,b[n-p,i]][素数[i]]];T[n_]:=如果[n==1,0,表[b[n-素数[k],k],{k,1,素数Pi[n]}];表[T[n],{n,1,25}]//扁平(*Jean-François Alcover公司2016年12月6日之后阿洛伊斯·海因茨*)
关键词
非n,标签,
作者
N.J.A.斯隆2015年8月16日
扩展
更多术语来自阿洛伊斯·海因茨2015年8月16日
状态
经核准的

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

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

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