%I#15 2023年10月12日01:53:26

%S 1,1,2,1,2,4,6,8,2,4,6，8,12,24,4,6,12,24，6,8,12,36，48,72,96120,12216240，

%电话：24,36,48,72,96120144216240288,24,364,48,72，9612014421.6240，

%电话：2883604805767201080,721440120144216240288360480576

%N a（N）=A002182（N）/A002110（A108602（N））。

%C该序列出现在Siano论文第5页，共12页，作为“可变部分”v.-Michael De Vlieger_，2023年10月11日

%H Michael De Vlieger，n的表，n=1..10000的a（n）</a>

%H Michael De Vlieger，<a href=“http://vincico.com/proof/A301414.html“>在高度合成数的图上</a>

%H A.Flammenkamp，<A href=“http://wwwhomes.uni-bielefeld.de/achim/highly.html“>高度复合数字</a>

%H D.B.Siano和J D.Siano，<a href=“http://wwwhomes.uni-bielefeld.de/achim/julianmanuscript3.pdf“>生成高度合成数字的算法</a>，1994年。

%F a（n）=A002182（n）/A007947（A002182（n））。

%e设m是这个序列中的一个值。下表显示了m*A002110（A108602（k））。列为A108602（k），行为m，其乘积m*A002110（A108601（k））出现在A002182中的顺序如下。A002182中也出现在A002201中的数字后面跟着（*）。

%e 0 1 2 3 4 5 6。。。

%e（电子）+------------------------------------

%e 1|1*2*6*

%e 2|4 12*60*

%e 4|24 120*840

%电话：6 | 36 180 1260

%电话：8 | 48 240 1680

%电子邮箱12|360*2520*27720

%电话：24|720 5040*55440*720720*

%e。。。

%t（*从A002182加载b文件*）

%t使用[{s=Import[“b002182.txt”，“Data”][[All，-1]]}，Array[#/Product[Prime@i，{i，PrimeNu[#]}]&@s[[#]]&，62]]

%Y参见A002110、A002182、A108602、A301414。

%K nonn公司

%氧1,3

%2018年3月30日，A _Michael De Vlieger_