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

 


A033158号
以(1,5)开头;避免三项算术级数。
4
1, 5, 6, 8, 12, 13, 17, 24, 27, 32, 34, 38, 39, 45, 50, 57, 74, 79, 81, 86, 96, 100, 107, 125, 129, 132, 137, 144, 170, 189, 198, 204, 221, 222, 227, 228, 239, 248, 260, 270, 277, 285, 288, 303, 309, 311, 314, 320, 338, 386, 393, 398, 423, 435, 456, 467, 471, 492, 494, 500
抵消
1,2
参考文献
Iacobescu,F.“Smarandache分区类型和其他序列”牛市。纯应用程序。科学。16E,237-2401997年。
H.Ibstedt,《几个斯马兰达奇序列》,《斯马兰达奇概念杂志》,第8卷,第1-2-3期,1997年,第170-183页。
链接
阿洛伊斯·海因茨,n=1时的n,a(n)表。.2000
Eric Weistein的《数学世界》,非算术级数
数学
ss[s1_,M_]:=模块[{n,chvec,swi,p,s2,i,j,t1,mmm},t1=长度[s1];毫米=1000;s2=表格[s1,{t1+M}]//平坦;chvec=数组[0&,mmm];对于[i=1,i<=t1,i++,chvec[[s2[[i]]]=1];(*得到第n项*)对于[n=t1+1,n<=t1+M,n++,(*尝试i作为下一项*),对于[i=s2[[n-1]]+1,i<=mmm,i++,swi=-1;(*第j项测试*)对于[j=1,j<=n-2,j++,p=s2[[n-j]];如果[2*p-i<0,中断[]];如果[chvec[[2*p-i]]==1,swi=1;中断[]]];如果[swi==-1,s2[[n]]=i;chvec[[i]]=1;中断[]]];如果[swi==1,打印[“错误,在n=”,n]]];表[s2[[i]],{i,1,t1+M}]];A033158号=ss[{0,4},80]+1(*Jean-François Alcover公司2013年10月8日,在Maple项目之后A185256个*)
关键词
非n
作者
状态
经核准的

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

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

上次修改时间:2024年9月20日06:55 EDT。包含376067个序列。(在oeis4上运行。)