|
|
1, 4, 8, 9, 16, 25, 27, 32, 36, 49, 64, 72, 81, 100, 108, 121, 125, 128, 169, 196, 200, 216, 225, 243, 256, 288, 289, 343, 361, 392, 432, 441, 484, 500, 512, 529, 625, 648, 675, 676, 729, 800, 841, 864, 900, 961, 968, 972, 1000, 1024, 1089, 1125, 1152, 1156, 1225
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1,2
|
|
|
评论
|
如果一个数的素数重数都大于1，那么这个数就是强大的。
|
|
|
链接
|
|
|
|
例子
|
144=2^4*3^2不在序列中，因为4和2不是成对不可分割的。
|
|
|
MAPLE公司
|
过滤器：=proc（n）局部L，i，j，q；
L： =转换（映射（t->t[2]，ifactors（n）[2]），集）；
如果min（L）=1，则返回假fi；
对于从2到nops（L）do的j
对于i从1到j-1 do
q： =L[i]/L[j]；
如果q:：integer或（1/q）：：intege，则返回false fi；
od od；
真的
结束进程：
|
|
|
数学
|
选择[Range[1000]，And[Max@@Last/@FactorInteger[#]>=2，Select[Tuples[Last/@FactorIntiger[#]，2]，And[UnsameQ@@#，Divisible@@#]&]={}]&]
|
|
|
交叉参考
|
囊性纤维变性。A001694号,A056239号,A112798号,A118914号,A124010型,A285572型,A285573型,A303362,A304713型,A316475型,A317101型,A317616飞机.
|
|
|
关键词
|
非n
|
|
|
作者
|
|
|
|
扩展
|
|
|
|
状态
|
已批准
|
|
