搜索： a240591-编号：a24059l
|
| |
| |
|
|
|
2, 2, 0, 2, 3, 0, 2, 0, 4, 3, 2, 2, 3, 3, 2, 0, 1, 3, 5, 5, 2, 1, 1, 5, 1, 7, 0, 5, 2, 4, 5, 1, 5, 2, 7, 3, 2, 2, 6, 9, 4, 4, 0, 7, 8, 2, 7, 4, 4, 8, 1, 1, 4, 4, 9, 7, 2, 1, 9, 10, 6, 1, 0, 2, 0, 9, 12, 7, 4, 12, 6, 5, 4, 5, 12, 0, 8, 3, 3, 10, 8, 0, 2, 13, 2, 13, 10, 10, 1, 15, 0, 7, 9, 9, 3, 13, 7, 4, 0, 7, 5, 4, 13, 2
(列表；图表；参考；听；历史；文本；内部格式)
|
|
|
|
偏移
|
1,1
|
|
|
链接
|
|
|
|
例子
|
|
|
|
程序
|
（平价）
ispowerful（n）={local（h）；如果（n==1，h=1，h=（vecmin（factor（n）[，2]）>1））；返回（h）}
proxpowerful（n）={local（k）；k=n+1；while（！ispowerful（k），k+=1）；return（k）}
{对于（i=15000，if（幂（i），m=proxpowerful（i）；p=primpi（m）-primpi（i））；print1（p，“，”））}
|
|
|
交叉参考
|
|
|
|
关键词
|
非n
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
| |
|
|
A371190型
|
| 一对连续的强大数中较小的一个，它们之间没有非平方自由数。 |
|
+10
1
|
|
|
|
1, 4, 8, 25, 32, 288, 675, 968, 1152, 1369, 2700, 9800, 12167, 39200, 48668, 70225, 235224, 332928, 465124, 1331712, 1825200, 5724500, 7300800, 11309768, 78960996, 189750625, 263672644, 384199200, 592192224, 912670088, 1536796800, 2368768896, 4931691075, 5425069447, 8957108164
(列表；图表；参考；听；历史；文本；内部格式)
|
|
|
|
偏移
|
1,2
|
|
|
链接
|
|
|
|
例子
|
1是一个项，因为1和4是连续的强大数，它们之间的数字2和3都是无平方的。
|
|
|
数学
|
seq[max_]：=模块[{pows=Union[Flatten[Table[i^2*j^3，{j，1，Surd[max，3]}，{i，1，Sqrt[max/j^3]}]]，s={}}，Do[If[AllTrue[Range[pows[[k]]+1，pows[k+1]]-1]，SquareFreeQ]，AppendTo[s，pows[[k]]]，{k，1，Length[pows]-1}]；s] ；序列[10^10]
|
|
|
程序
|
（PARI）列表a（mx）={my（s=List（），is）；对于（j=1，sqrtnint（mx，3），对于（i=1，sqltint（mx\j^3），列表put（s，i^2*j^3）；}
|
|
|
交叉参考
|
|
|
|
关键词
|
非n
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
搜索在0.006秒内完成
|
