登录
OEIS基金会得到了OEIS用户的捐赠和西蒙斯基金会的资助。

 

标志

年终上诉:请捐赠给OEIS基金会支持OEI的持续开发和维护。我们现在已经56岁了,我们接近35万个序列,我们已经跨越了9700次引用(通常说“感谢oei的发现”)。

提示
(问候来自整数序列在线百科全书!)
A219182年 n到任意个数k的不同素数部分的最大划分数,如果没有这样的划分,则为0。 2
1、0、1、1、1、0、1、0、1、0、1、1、1、1、1、1、1、1、1、1、1、1、2、1、1、1、1、2、2、2、2、2、3、3、2、2、2、3、3、2、3、3、4、3、4、3、4、3、3、3、3、3、5、5、4、6、6、6、6、6、6、6、6、6、6、6、9、9、8、8、8、8、10、8、8、10、10、11、11、11、11、11、13、13、13、13、13、18、14、14、14、18、14、14、15、21、15、15、15、15、15 22,29,22 (列表;图表;参考文献;;历史;文本;内部格式)
抵消

0,17

评论

a(n)是三角形第n行的最大元素A219180年如果行为空,则为0。a(n)=0 iff n in{1,4,6}。

链接

阿洛伊斯·P·海因茨,n=3500 n的表0

公式

a(n)=max{k>=0}A219180年(n,k)。

例子

a(31)=4,因为有4个31的分块为3个不同的质数部分([3,5,23],[3,11,17],[5,7,19],[7,11,13]),但对于任何其他k,不超过4个31的分划为k个不同的质数部分。

枫木

带(数字):

b: =proc(n,i)选项记忆;

'如果`(n=0,[1],`如果`(i<1,[0],邮政编码((x,y)->x+y,b(n,i-1),

[0,`if`(ITH素数(i)>n,[],b(n-ITH素数(i,i-1))[]],0)))

结束:

a: =n->max(b(n,pi(n))[]):

顺序(a(n),n=0..120);

数学

zip=带[{m=Max[Length[#1],Length[#2]]},PadRight[#1,m]+PadRight[#2,m]]&;b[n,i}:如果[n==0,{1},如果[i<1,{0},zip[b[n,i-1],Join[{0},如果[Prime[i]>n,{},b[n-Prime[i],i-1]]]]];a[n_x]:=最大值[b[n,PrimePi[n]]];表[a[n],{n,0,120}](*让·弗朗索瓦·阿尔科弗2017年2月12日,译自枫叶*)

交叉引用

囊性纤维变性。A219180年.

上下文顺序:A271721号 A050252号 A025877号*A184171号 A133989年 A029398号

相邻序列:A219179年 A219180年 A219181年*A219183年 A219184年 A219185年

关键字

作者

海因茨2012年11月13日

状态

经核准的

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

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

上次修改时间:2021年11月30日22:31。包含349426个序列。(运行在oeis4上。)