|
|
A139456号 |
| 数字n,使primorial(n)/2-1024是质数。 |
|
5
|
|
|
5, 9, 10, 11, 16, 17, 20, 59, 96, 98, 318, 387, 938, 978, 1764, 8298, 10632, 11796, 19982
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,1
|
|
评论
|
|
|
链接
|
|
|
数学
|
k=1;a={};Do[k=k*素数[n];如果[PrimeQ[k-1024]&&k>1024,打印[n];附加到[a,n]],{n,2325}];一
放下[Flatten[Position[FoldList[Times,Prime[Range[400]]],_?(PrimeQ[#/2-1024]&)]],3](*程序生成序列的前12项。要生成更多项,请增加Range常数,但程序可能需要很长时间才能运行。*)(*哈维·P·戴尔2023年9月15日*)
|
|
交叉参考
|
|
|
关键词
|
非n
|
|
作者
|
|
|
扩展
|
删除2,3,4并更正程序a(12)-a(15)雷·钱德勒2013年6月16日
|
|
状态
|
经核准的
|
|
|
|