%I#12 2020年8月31日04:23:38

%S 3,5,6,7,9,10,11,13,14,15,17,18,19,20,21,22,23,25,26,27,28,29,30,31，

%电话：33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,49,50,51,52,53,54,55,56，

%U 57,58,59,60,61,62,63,65,66,67,68,69,70,71,72,73,74,75,76

%N不能作为超因子A000178的乘积写入的数字。

%C First与A336426的不同之处在于有360。

%e术语序列及其基本指数开始于：

%e3:{2}22:{1,5}39:{2,6}

%e 5:{3}23:{9}40:{1,1,3}

%e 6:{1,2}25:{3,3}41:{13}

%e 7:{4}26:{1,6}42:{1,2,4}

%e 9:{2,2}27:{2,2,2}43:{14}

%e 10:{1,3}28:{1,1,4}44:{1,1.5}

%e 11:{5}29:{10}45:{2,2,3}

%e 13:{6}30:{1,2,3}46:{1,9}

%e 14:{1,4}31:{11}47:{15}

%e 15:{2,3}33:{2,5}49:{4,4}

%e 17:{7}34:{1,7}50:{1,3,3}

%e 18:{1,2,2}35:{3,4}51:{2,7}

%e 19:{8}36:{1,1,2,2}52:{1,1,6}

%e 20:｛1,1,3｝37:｛12｝53:｛16｝

%e 21:{2,4}38:{1,8}54:{1,2,2,2}

%t supfac[n_]：=乘积[k！，{k，n}]；

%t fasusing[s_，n_]：=如果[n<=1，{{}}，连接@@表[Map[Prepend[#，d]&，Select[fasusing[Select[s，Divisible[n/d，#]&]，n/d]，Min@@#>=d&]]，{d，Select[s，Diviible[n，#]&]}]；

%t选择[Range[100]，facsusing[Rest[Array[supfac，30]]，#]=={}&]

%Y A093373是阶乘的版本，带有补码A001013。

%Y A336426是超原件的版本，补充A181818。

%Y A336496是补码。

%Y A000178列出了超要素。

%Y A001055统计因子分解。

%Y A006939列出了超级像素或Chernoff数。

%Y A049711是A000178（n）中的最小素数重数。

%Y A174605是A000178（n）中的最大素数重数。

%Y A303279统计超基本的素因子（具有多重性）。

%Y A317829计算了超基本因子分解。

%Y A322583将因子分解计算为阶乘。

%Y A325509将阶乘分解计算为阶乘。

%Y参见A000142、A000720、A007489、A011371、A022559、A022915、A027423、A034878、A03487、A076954、A115627、A294068。

%K非n

%O 1,1号机组

%A _Gus Wiseman_，2020年8月3日