|
|
A103538号 |
| 对k进行编号,使素数(k)*prime(k)#-1是素数,其中prime(k)#是第k个素数。 |
|
0
|
|
|
1, 2, 3, 5, 6, 7, 13, 16, 20, 23, 64, 191, 490, 3620, 5909
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,2
|
|
链接
|
|
|
数学
|
q[n_]:=PrimeQ[Prime[n]*积[Prime[1],{i,1,n}]-1];选择[范围[500],q](*阿米拉姆·埃尔达尔2021年7月18日*)
模[{nn=500,p1,p2},p1=Prime[nn]];p2=文件夹列表[次数,p1];选择[Thread[{p1,p2}],PrimeQ[Times@@#-1]&][[;;,1]]//PrimePi(*哈维·P·戴尔2023年5月21日*)
|
|
交叉参考
|
|
|
关键词
|
非n,更多
|
|
作者
|
|
|
扩展
|
|
|
状态
|
经核准的
|
|
|
|