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

 

标志


提示
问候整数序列的在线百科全书!)
A018847 频段语法素数:同样颠倒(计算器样式数字)。
2, 5, 11、101, 151, 181、619, 659, 6229、10501, 12821, 15551、16091, 18181, 19861、60209, 60509, 61519、61819, 62129, 116911、119611, 160091, 169691、191161, 196961, 605509、620029, 625529, 626929、650059, 655559, 656959、682289, 686989, 688889 列表图表参考文献历史文本内部格式
抵消

1,1

评论

这是素数的子序列。A018846. -哈斯勒05五月2012

链接

M. F. Haslern,a(n)n=1…648的表

Mathematica

LST= {};FQ[n]:=块[{AlcSETSE= { 0, 1, 2,5, 6, 8,9 },ID=整数} n},联合@联接[ID,AlSETSE]== ALSETATE&&RAPID[ID/]。{ 6>9, 9>6 }==ID];DI[I[ Primeqn&&Fq@ n,AppDoto[LST,n],{n,700000 }](*)Robert G. Wilson五世2月27日2007*)

黄体脂酮素

(PARI) {write("/tmp/b018847.txt", "1 2\n2 5"); c=2; s2=[0, 1, 2, 5, 6, 8, 9]; s=[0, 1, 2, 5, 8]; s1=[0, 1, 2, 5, 9, 8, 6]; for(n=2, 9, p1=vector( (n+1)\2, i, 10^(i-1)); p2=vector( (n+1)\2, i, 10^(n-i)); forvec( v=vector((n+1)\2, i, if( i>1, [ 1, if( i>n\2, #s, #s1)], [2, 5])), v[1]==3 & v[1]=5; ispseudoprime( t=sum(i=1, n\2, p1[i]*s1[v[i]]+p2[i]*s2[v[i]] ) +if(n%2, p1[#p1]*s[v[#v]] )) & /* print1(t", ") */ write("/tmp/b018847.txt", c++" "t)))} \\ -哈斯勒4月26日2012

(帕里)伊斯A018847(n,t=VEC(“012…59.86”))={IsPrimy(n)&应用(x-t[EVA](x)+1),n=VEC(STR(n))==VECUCHORE(n,“-1…1”)}哈斯勒05五月2012

交叉裁判

囊性纤维变性。A000 797(更严格的版本不允许数字2或5)。

语境中的顺序:A26727 A2664 A309375*A178318 A13499 A13499

相邻序列:A018844 A018845 A018846*A018848 A018849 A018850

关键词

诺恩基地

作者

戴维·W·威尔逊

地位

经核准的

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

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

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