登录
这个网站是通过捐款来支持的。OEIS基金会.

 

标志


提示
问候整数序列的在线百科全书!)
A000 587 开始0, 4,不包含3项算术级数。
(原M3243)
十一
0, 4, 5,7, 11, 12,16, 23, 26,31, 33, 37,38, 44, 49,56, 73, 78,80, 85, 95,99, 106, 124,128, 131, 136,143, 169, 188,197, 203, 220,221, 226, 227,221, 226, 227,γ,γ,γ,γ,γ 列表图表参考文献历史文本内部格式
抵消

0、2

评论

这就是现在所说的斯坦利序列S(0,4)。A185256.

推荐信

R. K. Guy,数论中未解决的问题,E10。

S.N.J.A.斯隆和Simon Plouffe,《整数序列百科全书》,学术出版社,1995(包括这个序列)。

链接

Chai Wah Wun,a(n)n=0…10000的表

P. Erdos,V. Lev,G. Rauzy,C. Sandor,A. Sarkozy,贪心算法、算术级数、子集和和整除性,离散数学200(1999),pp.119-135。

R. A. Moy和D. Rolnick斯坦利序列中的新结构,阿西夫:1502.06013(数学,Co),2015。

R. A. Moy和D. Rolnick斯坦利序列中的新结构,离散数学,339(2016),68—698。

A. M. Odlyzko和R. P. Stanley用贪心算法构造一些奇怪序列,1978

与非平均序列相关的索引条目

Mathematica

ss[s1_, M_] := Module[{n, chvec, swi, p, s2, i, j, t1, mmm}, t1 = Length[s1]; mmm = 1000; s2 = Table[s1, {t1 + M}] // Flatten; chvec = Array[0&, mmm]; For[i = 1 , i <= t1 , i++, chvec[[s2[[i]] ]] = 1]; (* get n-th term *) For[n = t1+1 , n <= t1 + M , n++, (* try i as next term *) For[i = s2[[n-1]] + 1 , i <= mmm , i++, swi = -1; (* test against j-th term *) For[ j = 1 , j <= n-2 , j++, p = s2[[n - j]]; If[ 2*p - i < 0 , Break[] ]; If[ chvec[[2*p - i]] == 1 , swi = 1; Break[] ] ]; If[ swi == -1 , s2[[n]] = i; chvec[[i]] = 1; Break[] ] ]; If[ swi == 1 , Print["Error, no solution at n = ", n] ] ]; Table[s2[[i]], {i, 1, t1+M}] ]; ss[{0, 4}, 80] (*让弗兰,9月10日2013,从枫树计划翻译A185256*)

黄体脂酮素

(蟒蛇)

A000 587o列表= [ 0, 4 ]

我在范围(101-2):

n,标志=A000 587列表[-1 ] + 1,假

虽然真实:

j的范围(i + 1, 0,- 1):

M=2 *A000 587表[j]

如果M在A000 587清单:

打破

如果M<A000 587清单0

旗号=真

打破

其他:

            A000 587追加(n)

打破

如果标志:

            A000 587追加(n)

打破

n+=1吴才华,05月1日2016

交叉裁判

等于A033 158(n+1)- 1。囊性纤维变性。A185256.

语境中的顺序:A032686A A07300 A047 375*A29 1741 A084097 A175903

相邻序列:A000 584 A000 585 A000 586*A000 548 A000 589 A000 54 90

关键词

诺恩

作者

斯隆

扩展

名称澄清查尔斯1月30日2014

地位

经核准的

查找γ欢迎γ维基γ注册γ音乐γ情节2γ演示γ指数γ浏览γ更多γ网络摄像机
贡献新的SEQ。或评论γ格式γ样式表γ变换γ超级导引头γ最近
OEIS社区通过保持OEIS基金会

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

最后修改9月17日21:22 EDT 2019。包含327146个序列。(在OEIS4上运行)