登录
A080376号
数字,其中A080374号增加。
6
2, 4, 9, 24, 30, 34, 99, 189, 217, 282, 367, 738, 3302, 3427, 3644, 3793, 4612, 7970, 8688, 14357, 23283, 34202, 49414, 85633, 85787, 103520, 224659, 273413, 415069, 474029, 685903, 2386432, 2398788, 2959782, 4875380, 6169832, 9330121, 12768473, 13879771, 17681799
抵消
1,1
评论
连续素数差(素数(a(n)+1)-素数(b(n)))出现新素数幂因子的数字。
链接
阿米拉姆·埃尔达尔,n=1..64时的n,a(n)表(条款低于10^10)
例子
发件人迈克尔·德弗利格2017年5月12日:(开始)
的值A080374号从a(n)开始。
n个(n)A080374号(a(n))
1 2 1
2 4 2
3 9 4
4 24 12
5 30 24
6 34 168
7 99 840
8 189 2520
9 217 27720
10 282 471240
11 367 942480
12 738 12252240
13 3302 24504480
14 3427 465585120
15 3644 2327925600
16 3793 72165693600
17 4612 216497080800
18 7970 6278415343200
19 8688 144403552893600
20 14357 288807105787200
21 23283 12418705548849600
22 34202 509166927502833600
23 49414 18839176317604843200
24 85633 131874234223233902400
25 85787 6989334413831396827200
...
(结束)
数学
s=1;Do[s1=s;s=LCM[s,素数[n+1]-素数[n]];如果[Greater[s,s1],Print[n]],{n,1,100000}]
(*第二个节目:*)
最多[Accumulate@#2+1]&@@Transpose@Map[{First@#,Length@#}&,Split@FoldList[LCM@@{#1,#2}&,Differences@Array[Prime,10^4]]](*迈克尔·德弗利格2017年5月12日*)
黄体脂酮素
(PARI)列表a(pmax)={my(k=1,p1=2,lcmmax=1,lcm1=1,d);对于素数(p2=3,pmax,d=p2-p1;lcm1=lcm(lcm1,d));如果(lcm1>lcmmax,lcmmax=lcm1;print1(k,“,”);p1=p2;k++);}\\阿米拉姆·埃尔达尔,2024年6月9日
关键词
非n
作者
拉博斯·埃利默2003年2月27日
扩展
编辑人N.J.A.斯隆,2017年5月13日,根据迈克尔·德弗利格.
更多术语来自阿米拉姆·埃尔达尔,2024年6月9日
状态
经核准的