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

 

标志
提示
(问候来自整数序列在线百科全书!)
A006567号 Emirps(反转为不同素数的素数)。
(原M4887)
181
13、17、31、37、71、73、79、97、107、113、149、157、167、179、199、311、337、347、359、389、701、709、733、739、743、751、761、769、907、937、941、953、967、971、983、991、1009、1021、1031、1033、1061、1069、1091、1097、1103、1109、1151、1153、1181、1193、1201 (列表;图表;参考文献;;历史;文本;内部格式)
抵消

1,1

评论

回文是一个词,当写在相反的时候,结果是同一个词。例如,“赛车”颠倒后仍然是“赛车”。与回文相关的是semordnilaps。这些单词在写反时会产生一个不同的有效单词。例如“甜品”的反面写着“S”。并非所有的单词都是回文或同义词。当然不是所有的数字都是回文,但所有的非回文数字在写反写时都会形成semordnilaps。缩小到素数会带来与单词相同的三分法:有些数字是emirp,有些数字是回文素数,但有些单词两者都不是。

“emirp”一词是由美国数学家耶利米·法雷尔(Jeremiah Farrell,生于1937年)发明的-阿米拉姆埃尔达2021年6月11日

参考文献

马丁加德纳,矩阵博士的神奇数字。普罗米修斯,布法罗,纽约,1985年,第230页。

N、 J.A.Sloane和Simon Plouffe,《整数序列百科全书》,学术出版社,1995年(包括该序列)。

链接

T、 D.不,n=1的n,a(n)表。。10000

克里斯·K·考德威尔,主要词汇表,埃米尔.

布拉迪·哈兰和N·J·A·斯隆,下一个号码是什么?,数字视频,2018年。

埃里克·韦斯坦的数学世界,反素数.

维基百科,反素数.

枫木

读取(“转换”);isA006567:=proc(n)局部R;如果isprime(n),则R:=digrev(n);isprime(R)和R<>n;否则错误;结束if;结束过程:

A006567号:=proc(n)选项记住;本地a;如果n=1,则为13;否则a:=nexttime(procname(n-1));如果不是isA006567(a),则执行a:=nexttime(a);结束do;返回a;结束if;结束过程:

序号(A006567号(n) ,n=1。。120)#R、 J.马萨2010年5月24日

数学

fQ[n_u]:=块[{idn=IntegerReverse@n},PrimeQ@idn&&n!=idn];选择[Prime@Range@200,fQ](*桑蒂·斯帕达罗,2001年10月14日,修改人罗伯特·G·威尔逊五世2015年11月8日*)

选择[Prime[Range[5200]]、PrimeQ[IntegerReverse[#]]&&!PalindromeQ[#]&](*需要Mathematica版本10或更高版本*)(*哈维·P·戴尔2021年5月11日*)

黄体脂酮素

(岩浆)[n:n in[1..1194]| n ne rev and IsPrime(n)and IsPrime(rev),其中rev是sequint(反向(Intseq(n))];//谢尔盖·哈勒。de),2006年12月21日

(PARI)is(n)=我的(r=eval(concat(Vecrev(Str(n)))));音质(r)&&r=n&&isprime(n)\\查尔斯R格雷特豪斯四世2012年11月20日

(PARI)选择({is_A006567号(n,r=fromdigits(Vecrev(数字(n)))=isprime(r)&&r=n&&isprime(n)},素数(200))\\M、 哈斯勒2020年1月31日

(哈斯克尔)

a006567 n=a006567\U列表!!(n-1)

a006567_list=过滤器f a00040_list,其中

f p=a010051'q==1&&q/=p,其中q=a004086 p

--莱因哈德·祖姆凯勒2014年7月16日

(蟒蛇)

从sympy import prime,isprime

A006567号(1)in(p)中:str(1)in(p):str(1)in(p),如果[str(1)in(p)]str(1)in(p)=str(1)in(p)]#柴华武2014年8月14日

(蟒蛇)

从sympy import isprime,nexttime

def emirps(start=1,end=float('inf')):#emirps启动时的发生器。。结束

p=下一个时间(start-1)

当p<=结束时:

revp=int(str(p)[::-1])

如果p!=revp和isprime(revp):收益率p

p=下一时间(p)

结束(打印120RPS)#迈克尔·S·布兰尼基2021年1月24日

交叉引用

囊性纤维变性。A003684号,A007628号(子序列),A046732号,A048051号,A048052型,A048053号,A048054号,A048895号,A004086号(向后读n)。

A007500型是联合A002385号还有这个序列。

上下文顺序:邮编:A161401 A225035型 A344626飞机*A263240号 A246043号 A246045型

相邻序列:A006564号 A006565号 A006566号*A006568号 A006569号 A006570型

关键字

,美好的,容易的,基础

作者

N、 斯隆

扩展

更多条款来自詹姆斯A.塞勒斯2000年1月22日

状态

经核准的

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

隐私条款,许可协议。.

上次修改时间:2022年1月27日16:25。包含350608个序列。(运行在oeis4上。)