|
| |
|
| A092045号 |
| 数n，使素数（n）==-3（mod n）。 |
|
11
|
|
|
|
1, 2, 25, 26, 68, 1054, 1058, 6472, 251723, 4124468, 69709727, 69709942, 465769817, 465769835, 1208198860, 8179002154, 8179002176, 8179002178, 145935689360, 145935689369, 145935689392, 145935689393
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1,2
|
|
|
链接
|
|
|
|
数学
|
NextPrim[n_]：=块[｛k=n+1}，While[！PrimeQ[k]，k++]；k] ；p=1；Do[If[Mod[p=NextPrim[p]，n]==n-3，Print[n]]，{n，1，10^9}]
连接[{1，2}，选择[Range[5 10^6]，Mod[Prime[#]，#]=#-3&]](*哈维·P·戴尔2023年3月29日*）
|
|
|
交叉参考
|
|
|
|
关键词
|
非n
|
|
|
作者
|
|
|
|
扩展
|
由Mohammed Bouayoun（bouyao（AT）wanadoo.fr）更正，2004年2月20日
|
|
|
状态
|
已批准
|
| |
|
|
