%I#15 2020年9月5日03:42:39

%S 1,1,3,341591360144423498353255845551937156795416820025934，

%电话：534529790220011490033138542156296245533221812350867，

%电话：2914321438328993304235545383071448025284549514384152215051692136114617834748741498735447548317355392404474364670677438924478174290477803

%N超本原A006939（N）的严格因子分解数。

%第n个超素数是A006939（n）=Product_{i=1..n}素数（i）^（n-i+1）。

%C也是{1,2,2,3,3,3，…，n}的严格多集分区数，对于i=1..n，具有i个副本的多集。

%F a（n）=A045778（A006939（n））。

%F a（n）=A318286（A002110（n））_安德鲁·霍罗伊，2020年9月1日

%e a（3）=34因子分解：

%e 2*3*4*15 2*3x60 2*180 360

%e 2*3*5*12 2*4*45 3*120

%e 2*3*6*10 2*5*36 4*90

%e 2*4*5*9 2*6*30 5*72

%e 3*4*5*6 2*9*20 6*60

%e 2*10*18 8*45

%e 2*12*15 9*40

%e 3*4*30 10*36

%e 3*5*24 12*30

%e 3*6*20 15*24

%e 3*8*15 18*20

%e 3*10*12

%e 4*5*18

%e 4*6*15

%e 4*9*10

%e 5*6*12

%e 5*8*9

%t chern[n_]：=乘积[素数[i]^（n-i+1），{i，n}]；

%t stfa[n_]：=如果[n<=1，{{}}，连接@@表[Map[Prepend[#，d]&，选择[stfa[n/d]，Min@@#>d&]]，{d，Rest[Divisors[n]]}]；

%t表格[长度[stfa[chern[n]]]，{n，0,3}]

%o（PARI）\\计数见A318286。

%o a（n）={if（n==0，1，count（向量（n，i，i））}\\ Andrew Howroyd_，2020年9月1日

%Y A022915统计同一多集的排列。

%Y A157612是阶乘的版本，而不是超基本的版本。

%Y A317829为非限制型。

%Y A337072是无平方因子的非限制型飞机。

%Y A337073是无平方因子的情况。

%Y A000217统计超素数的素因子（具有多重性）。

%Y A001055统计因子分解。

%Y A006939列出了超基本数或切尔诺夫数。

%Y A045778计算严格的因子分解。

%可以使用Y A076954代替A006939（参见A307895、A325337）。

%Y A181818列出了超初级产品，并补充了A336426。

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

%Y参考A000142、A000178、A002110、A022559、A027423、A303279、A318286、A322583、A337070、A337071。

%K nonn公司

%0、3

%A _Gus Wiseman_，2020年8月15日

%E a（7）-a（13），摘自Andrew Howroyd_，2020年9月1日