|
|
|
|
#20通过哈维·P·戴尔2023年9月6日星期三19:05:55 EDT |
|
|
|
#19通过哈维·P·戴尔2023年9月6日星期三19:05:52 EDT |
| 数学
|
emrpQ[n_]:=模块[{idn=整数位数[n],ridn},ridn=反向[idn];身份证号码=ridn和PrimeQ[[From数字[[脊]]];nss[n_]:=模块[{idn=IntegerDigits[n]},选择[e,MemberQ[Partition[[整数位数[#],长度[idn],1],idn]&,1]];使用[{e=Select[Prime[Range[50000]],emrpQ]},Flatten[[联接[{107},表[nss[i],{i,50}]](*哈维·P·戴尔2012年10月8日*)
|
| 状态
|
经核准的
编辑
|
|
|
|
#18通过OEIS服务器2012年10月10日星期三20:12:22 EDT |
| 链接
|
Alois P.Heinz,<a href=“/A178546号/编号178546_1.txt“>n,a(n)的表格,n=0..2000</a>
|
|
|
|
#17通过阿洛伊斯·海因茨2012年10月10日星期三20:12:22 EDT |
|
|
讨论
|
10月10日星期三
| 20:12
| OEIS服务器:已安装新的b文件b178546.txt。旧的b文件现在是b178546_1.txt。
|
|
|
|
#16通过阿洛伊斯·海因茨2012年10月10日星期三20:12:18 EDT |
| 链接
|
Alois P.Heinz,<a href=“/A178546号/编号178546_1.txt“>n表,n=0时为a(n)。。10002000</a>
|
| 状态
|
经核准的
编辑
|
|
|
|
#15通过阿洛伊斯·海因茨2012年10月10日星期三19:55:50 EDT |
|
|
|
#14通过阿洛伊斯·海因茨2012年10月10日星期三19:52:20 EDT |
| 链接
|
Alois P.Heinz,<a href=“/A178546号/b178546.txt“>n表,n=0..1000时为a(n)</a>
|
|
|
|
#13通过阿洛伊斯·海因茨美国东部时间2012年10月10日星期三19:49:53 |
|
|
|
#12通过哈维·P·戴尔2012年10月8日星期一10:31:03 EDT |
|
|
|
#11通过哈维·P·戴尔美国东部时间2012年10月8日星期一10:30:53 |
|
|
|