|
| |
|
| A023146号 |
| 数k，使素数（k）==4（mod k）。 |
|
13
|
|
|
|
1, 75, 77, 637331, 637333, 637341, 637343, 27067053, 179992917, 8179002205, 2636913002917, 6201265271239157, 6201265271239347, 6201265271239413, 6201265271239981, 6201265271240331, 6201265271240341, 2159986889494445405, 2159986889494445525, 2159986889494445615
(列表；图表；参考；听；历史；文本；内部格式)
|
|
|
|
偏移
|
1,2
|
|
|
链接
|
|
|
|
例子
|
第75素数是379，379==4（mod 75）。因此，序列中有75个。
第76素数是383，但383==3，而不是4（mod 76）。所以76不在序列中。
|
|
|
数学
|
nextPrime[n_]：=块[{k=n+1}，While[！PrimeQ[k]，k++]；k] ；p=1；Do[If[Mod[p=nextPrime[p]，n]==4，Print[n]]，{n，1，10^9}](*罗伯特·威尔逊v2004年2月18日*）
选择[Range[1000]，Mod[Prime[#]，#]==4&](*阿隆索·德尔·阿特2018年11月16日*）
|
|
|
黄体脂酮素
|
（圣人）
条款=[]
p=2
对于范围（1，最大值+1）内的n：
如果（p-4）%n==0：术语.append（n）
p=下一素数（p）
退货条款
|
|
|
交叉参考
|
|
|
|
关键词
|
非n
|
|
|
作者
|
|
|
|
扩展
|
|
|
|
状态
|
经核准的
|
| |
|
|
