A372028-编号：A372028

搜索： a372028-编号：a372028

显示1-1个结果（共1个）。

第页1

排序：关联|参考文献|数|被改进的|创建格式：长的|短的|数据

A372009型

指数k是这样的A124652号（k）是最好的。

+10
三

2, 3, 5, 11, 12, 20, 24, 28, 29, 33, 42, 43, 53, 58, 67, 78, 93, 98, 104, 105, 109, 112, 118, 125, 126, 137, 141, 145, 146, 162, 174, 182, 185, 187, 188, 195, 200, 223, 224, 231, 232, 239, 246, 249, 252, 255, 259, 264, 271, 275, 283, 286, 287, 296, 298, 300, 326

(列表;图表;参考;听;历史;文本;内部格式)

抵消

1,1

类似于A111238号，一个与A109890号.

链接

迈克尔·德弗利格，n=1..2500时的n，a（n）表

迈克尔·德弗利格，A124652（n）的对数散点图，n=1..25000，以红色显示素数。

配方奶粉

的适当子集A372028型.

例子

设b（x）=A124652号（x） ●●●●。

第一个术语表。

n（n）b（a（n））

-----------------

1 2 2

2 3 3

3 5 5

4 11 11

5 12 7

6 20 31

7 24 13

8 28 19

9 29 17

10 33 37

11 42 29

12 43 41

...

数学

nn=300；c[_]：=错误；

rad[x_]：=rad[x]=倍@FactorInteger[x][[All，1]]；

f[x_]：=选择[Range[x]，Divisible[x，rad[#]]&]；

数组[Set[｛a[#]，c[#]｝，｛#，True｝]&，2]；s=a[1]+a[2]；

{2} ~加入~Reap[Do[r=f[s]；k=选择第一项[r，！c[#]&]；

如果[PrimeQ[k]，Sow[i]]；c[k]=正确；

s+=k，{i，3，nn}][[-1，1]]

交叉参考

囊性纤维变性。A124652号,A372028型,A372284.

关键词

非n

作者

迈克尔·德弗利格，2024年4月29日

状态

经核准的

第页1

搜索在0.005秒内完成