|
| |
|
| A036966号 |
| 3-full（或cube-full，或cubefull）数：如果素数p除以n，那么p^3也是如此。 |
|
83
|
|
|
|
1, 8, 16, 27, 32, 64, 81, 125, 128, 216, 243, 256, 343, 432, 512, 625, 648, 729, 864, 1000, 1024, 1296, 1331, 1728, 1944, 2000, 2048, 2187, 2197, 2401, 2592, 2744, 3125, 3375, 3456, 3888, 4000, 4096, 4913, 5000, 5184, 5488, 5832, 6561, 6859, 6912, 7776, 8000
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1,2
|
|
|
评论
|
也称为powerful_3数字。
|
|
|
参考文献
|
M.J.Halm，《更多序列》，《可能性》83，2003年4月。
A.Ivic，《Riemann Zeta-Function》，纽约威利，1985年，见第407页。
E.Kraetzel，《格点》，Kluwer，第7章，第276页。
|
|
|
链接
|
|
|
|
配方奶粉
|
|
|
|
MAPLE公司
|
isA036966:=进程（n）
局部p；
ifactors（n）[2]中的p do
如果op（2，p）<3，则
返回false；
结束条件：；
结束do：
返回true；
结束进程：
选项记忆；
如果n=1，则
1 ;
其他的
对于from procname（n-1）+1 do
如果是A036966（a），则
返回a；
结束条件：；
结束do：
结束条件：；
|
|
|
数学
|
选择[Range[2，8191]，Min[Table[#[2]]，{1}]&/@FactorInteger[#]]>2&]
连接[{1}，选择[Range[8000]，最小[Transpose[FactorInteger[#]][[2]]>2&]](*哈维·P·戴尔2013年7月17日*）
|
|
|
黄体脂酮素
|
（哈斯克尔）
导入数据。集合（singleton、deleteFindMin、fromList、union）
a036966 n=a036966_列表！！（n-1）
a036966_list=1:f（singleton z）[1，z]z其中
f s q3s p3s’@（p3:p3s）
|m<p3=m:f（联合（fromList$map（*m）ps）s'）q3s p3s'
|否则=f（并集（fromList$map（*p3）q3s）s）（p3:q3）p3s
其中ps=a027748_低m
（m，s'）=删除查找最小值
（z:zs）=a030078_列表
（PARI）列表（lim）=我的（v=列表（），t）；对于（a=1，sqrtnint（lim\1,5），对于（b=1，sqltint（lim\ a^5,4），t=a^5*b^4；对于（c=1，sqrtnint（lim\t，3），listput（v，t*c^3））；集合（v）\\查尔斯·R·Greathouse IV2015年11月20日
（PARI）列表（lim）=我的（v=列表（），t）；forsquarefree（a=1，sqrtnint（lim\1,5），my（a5=a[1]^5）；forsquarefree（b=1，sqrtnint（lim\a5,4），if（gcd（a[1]，b[1]）>1，next）；t=a5*b[1]^4；对于（c=1，sqrtnint（lim\t，3），listput（v，t*c^3））；集合（v）\\查尔斯·R·Greathouse IV2022年1月12日
|
|
|
交叉参考
|
|
|
|
关键字
|
容易的,非n,美好的
|
|
|
作者
|
|
|
|
扩展
|
|
|
|
状态
|
经核准的
|
| |
|
|
