|
| |
|
| A023152号 |
| 数k，使素数（k）==10（mod k）。 |
|
18
|
|
|
|
1, 7, 19, 21, 2703, 15929, 4124583, 27067051, 179992913, 179993011, 179993159, 1208198559, 1208198859, 55762149031, 382465573511, 382465573547, 18262325820337, 6201265271239229, 6201265271239409, 6201265271239433, 43525513764814941, 43525513764816369, 43525513764816411, 43525513764816437, 306268030480171419
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
偏移
|
1,2
|
|
|
链接
|
|
|
|
数学
|
NextPrim[n_]：=块[｛k=n+1}，While[！PrimeQ[k]，k++]；k] ；p=1；Do[If[Mod[p=NextPrim[p]，n]==10，Print[n]]，{n，1，10^9}](*罗伯特·威尔逊v2004年2月18日*）
|
|
|
黄体脂酮素
|
（圣人）
条款=[]
p=2
对于范围（1，最大值+1）内的n：
如果（p-10）%n==0：术语.append（n）
p=下一素数（p）
退货条款
（PARI）n=0；对于素数（p=2，1e9，如果（Mod（p，n++）==10，打印1（n“，”））\\查尔斯·格里特豪斯四世2015年4月29日
|
|
|
交叉参考
|
|
|
|
关键词
|
非n
|
|
|
作者
|
|
|
|
扩展
|
|
|
|
状态
|
经核准的
|
| |
|
|
