|
|
A016041号 |
| 以2为基数的回文素数(但此处以10为基数)。 |
|
32
|
|
|
3, 5, 7, 17, 31, 73, 107, 127, 257, 313, 443, 1193, 1453, 1571, 1619, 1787, 1831, 1879, 4889, 5113, 5189, 5557, 5869, 5981, 6211, 6827, 7607, 7759, 7919, 8191, 17377, 18097, 18289, 19433, 19609, 19801, 21157, 22541, 22669, 22861, 23581, 24029
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,1
|
|
评论
|
小于4^k的项数,k=1,2,3,…:1, 3, 5, 8, 11, 18, 30, 53, 93, 187, 329, 600, 1080, 1936, 3657, 6756, 12328, 23127, 43909, 83377, 156049, 295916, 570396, 1090772, 2077090, 3991187, 7717804, 14825247, 28507572, 54938369, 106350934, ..., 的部分和A095741号加1-罗伯特·威尔逊v,2018年2月23日,更正人杰佩·斯蒂格·尼尔森2023年6月17日
|
|
链接
|
Robert G.Wilson v,n=1..10000时的n,a(n)表(扎克·塞多夫(Zak Seidov)的第1..1000条,迈克尔·德弗利格(Michael De Vlieger)的第1001..3000条)
|
|
配方奶粉
|
|
|
数学
|
lst={};执行[If[底漆Q@n,t=整数位数[n,2];如果[从数字@t==从数字@反转@t,追加到[lst,n]],{n,3,50000,2}];lst(*语法由更正罗伯特·威尔逊v2009年8月10日*)
pal2Q[n_]:=反向[x=整数位数[n,2]]==x;选择[Prime[Range[2800]],pal2Q[#]&](*贾扬达·巴苏2013年6月23日*)
genPal[n_Integer,base_Integer:10]:=块[{id=IntegerDigits[n,base],插入=Join[{{}},{#-1}和/@Range[base]]},FromDigits[#,base]和/@(Join[id,#,反向@id]&/@插入)];k=0;lst={};当[k<100,AppendTo[lst,Select[genPal[k,2],PrimeQ]]时;lst=在lst时变平;k++];第一次(*罗伯特·威尔逊v2018年2月23日*)
|
|
黄体脂酮素
|
(PARI)是(n)=isprime(n)&&Vecrev(n=二进制(n))==n\\M.F.哈斯勒2018年2月23日
(岩浆)[1.5000]|(Intseq(NthPrime(n),2)eq Reverse(Intsez(NthPrime(n,2))]中的NthPrice(n):n//文森佐·利班迪2018年2月24日
|
|
交叉参考
|
|
|
关键词
|
非n,容易的,基础
|
|
作者
|
|
|
扩展
|
|
|
状态
|
经核准的
|
|
|
|