|
| |
|
| A087977号 |
| a（n）是至少n个连续数的第一个链中的第一项，每个连续数正好有四个不同的素因子。 |
|
6
|
|
|
|
210, 7314, 37960, 134043, 357642, 1217250, 1217250, 14273478, 44939642, 76067298, 163459742, 547163235, 2081479430, 2771263512, 11715712410, 17911205580, 56608713884, 118968284928, 118968284928, 585927201062
(列表；图表；参考；听；历史；文本；内部格式)
|
|
|
|
偏移
|
1,1
|
|
|
评论
|
Eggleton和MacDougall表明，这个序列中的术语不超过419个-T.D.诺伊2008年10月13日
|
|
|
链接
|
|
|
|
例子
|
a（6）=a（7）=1217250，因为相关的7个连续数具有4个不同的素因子：
1217250 = 2 * 3^2 * 5^3 * 541;
1217251 = 7 * 17 * 53 * 193;
1217252 = 2^2 * 23 * 101 * 131;
1217253 = 3 * 47 * 89 * 97;
1217254 = 2 * 19 * 103 * 311;
1217255 = 5 * 13 * 61 * 307;
1217256 = 2^3 * 3 * 67 * 757.
|
|
|
数学
|
k=1；执行[While[Union[Table[Length[FactorInteger[i]]，{i，k，k+n-1}]]={4} ，k++]；打印[k]，｛n，1，8｝]
模块[{d4=Table[If[PrimeNu[n]==4，1，0]，{n，143*10^5}]}，Flatten[Table[SequencePosition[d4，PadRight[{}，n，1]，1]、{n，8}]，1][[All，1]]（*需要Mathematica版本10或更高版本*）（*这将生成序列的前8项*）(*哈维·P·戴尔2017年8月25日*）
|
|
|
交叉参考
|
|
|
|
关键词
|
非n,完成
|
|
|
作者
|
|
|
|
扩展
|
|
|
|
状态
|
经核准的
|
| |
|
|
