A151745-OEIS公司

A151745美元

两个、三个、四个和五个连续合成数字的总和。

405, 1395, 3435, 3525, 4245, 4365, 6675, 6885, 7155, 7515, 7995, 8325, 8445, 9075, 10365, 10845, 11205, 11543, 13005, 14235, 14325, 18075, 19725, 19875, 22605, 23257, 23475, 23617, 26805, 27315, 29835, 29955, 31035, 32355, 32925, 33165, 34395

(列表;图表;参考;听;历史;文本;内部格式)

抵消

1,1

链接

罗伯特·伊斯雷尔，n=1..6214时的n，a（n）表

配方奶粉

的交点A151740号,A151741号,A151742号和A151743美元. -R.J.马塔尔2009年6月17日

例子

405在列表中，因为它是复合的，并且

405=202+203（两个连续合成数之和）

405=134+135+136（三个连续复合数之和）

405=99+100+102+104（四个连续合成数之和）

405=78+80+81+82+84（五个连续合成数之和）。

MAPLE公司

N： =10^5:#对于术语<=N

成分：=删除（i首字母，[$2..N]）：

PSComps:=[0，op（ListTools:-PartialSums（Comps））]：

C2:=转换（PSComps[3..-1]-PSComps[1..-3]，集合）：

C3:=转换（PSComps[4..-1]-PSComps[1..-4]，集）：

C4:=转换（PSComps[5..-1]-PSComps[1..-5]，集）：

C5:=转换（PSComps[6...-1]-PSComps[1..-6]，集）：

R： =转换（组件，集合）与C2相交C3相交C4相交C5：

排序（转换（R，列表））#罗伯特·伊斯雷尔2020年8月17日

数学

CompositeNext[n_]：=模块[{k=n+1}，而[PrimeQ[k]，k++]；k] ；q=8！；lst2={}；Do[If[！PrimeQ[n]，c=CompositeNext[n]；a2=n+c；如果[！PrimeQ[a2]，AppendTo[lst2，a2]]，{n，q}]；lst2；lst3={}；Do[If[！PrimeQ[n]，c1=CompositeNext[n]；c2=复合下一步[c1]；a3=n+c1+c2；如果[！PrimeQ[a3]，AppendTo[lst3，a3]]]，{n，q}]；lst3；lst4={}；Do[If[！PrimeQ[n]，c1=CompositeNext[n]；c2=复合下一步[c1]；c3=复合下一步[c2]；a4=n+c1+c2+c3；如果[！PrimeQ[a4]，AppendTo[lst4，a4]]，{n，q}]；lst4；lst5={}；Do[If[！PrimeQ[n]，c1=CompositeNext[n]；c2=复合下一步[c1]；c3=合成下一个[c2]；c4=复合下一步[c3]；a5=n+c1+c2+c3+c4；如果[！PrimeQ[a5]，AppendTo[lst5，a5]]，{n，q}]；lst5；交集[lst2，lst3，lst4，lst5](*弗拉基米尔·约瑟夫·斯蒂芬·奥尔洛夫斯基，2009年6月17日*）

交叉参考

上下文中的序列：A337047飞机 A169904号 A267893型*A204636型 A224527号 A219147型

相邻序列：A151742号 A151743号 A151744号*A151746号 A151747号 A151748号

关键词

非n

作者

克劳迪奥·梅勒2009年6月15日

扩展

更正和扩展人哈维·P·戴尔2014年11月25日

更正人罗伯特·伊斯雷尔2020年8月17日

状态

经核准的