|
| |
|
| A318720型 |
| 数k使得k存在一个严格的相对素因子分解，其中没有一对因子是相对素的。 |
|
8
|
|
|
|
900, 1764, 1800, 2700, 3528, 3600, 4356, 4500, 4900, 5292, 5400, 6084, 6300, 7056, 7200, 8100, 8712, 8820, 9000, 9800, 9900, 10404, 10584, 10800, 11025, 11700, 12100, 12168, 12348, 12600, 12996, 13068, 13500, 14112, 14400, 14700, 15300, 15876, 16200, 16900
(列表；图表；参考；听；历史；文本；内部格式)
|
|
|
|
偏移
|
1,1
|
|
|
评论
|
此外，具有两个以上非酉素因子的数，即数字kA056170号（k） >2，或等价的，可被三个不同素数的平方整除的数。
|
|
|
链接
|
|
|
|
例子
|
900在序列中，因为因子分解900=（6*10*15）是相对素数（因为（6,10,15）的GCD是1），但每对（6,10）、（6,15）、（10,15）都有一个公约数>1。较大的示例包括：
1800 = (6*15*20) = (10*12*15).
9900 = (6*10*165) = (6*15*110) = (10*15*66).
5400=（6*20*45）=（10*12*45）=（10*15*36）=（15*18*20）。
60不在序列中，因为它所有可能的因式分解（4*15、3*4*5等）都包含至少一对互质，如果不超过一个素数的话。
|
|
|
数学
|
strfacs[n_]：=如果[n<=1，{{}}，连接@@表[（前缀[#1，d]&）/@选择[strfacs[n/d]，最小@@#1>d&]，{d，剩余[Divisors[n]]}]]；选择[Range[10000]，Function[n，Select[strfacs[n]，And[GCD@@#==1，And@@（GCD[##]>1&）@@@Select[Tuples[#，2]，Less@@#&]]&]！={}]]
选择[Range[20000]，Count[FactorInteger[#][[；；，2]]，_？(#1 > 1 &)] > 2 &] (*阿米拉姆·埃尔达尔2020年11月1日*）
|
|
|
交叉参考
|
囊性纤维变性。A001055号,A001221号,A001222号,A007716号,A045778号,A051185号,A078374号,A281116号,A303140,A303283型,A305843型,A305854型,A317748型,A318715型,A318717型,A318721型.
|
|
|
关键词
|
非n
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
