1,12个

设（e1，e2，…，ek）是n（即n=p^e1*q^e2*）的素数签名。。。*对于一些素数，p，q，…，r）。那么a（n）是将多集{e1x1，e2x2，…，ekxk}划分为多集的方法的数目，这样就没有一个数是1。。k存在于该集合划分的所有成员多集中。-安蒂·卡尔图宁2018年9月8日

安蒂·卡图宁，n=1..65537的n，a（n）表

从n的因式分解中的指数计算序列的索引项

a（6）=1：（2*3）

a（12）=2；（2*2*3）（3*4）

a（24）=3：（2*2*2*3）（2*3*4）（3*8）

a（30）=4:（2*3*5）（2*15）（3*10）（5*6）

a（36）=5：（2*2*3*3）（2*2*9）（2*3*6）（3*3*4）（4*9）

a（96）=7：（2*2*2*2*3）（2*2*2*3*4）（2*2*3*8）（2*3*4）（2*3*16）（3*4*8）（3*32）。

postfacs[n\]：=如果[n<=1，{}，Join@@Table[Map[Prepend[#，d]&，选择[postfacs[n/d]，Min@@>=d&]]，{d，Rest[除数[n]]]]；

表格[Length[Select[postfacs[n]，GCD@@@@==1&]]，{n，2，100}]

（平价）A281116（n，m=n，facs=List（[]）=if（1==n，（1==gcd（Vec（facs））），my（s=0，newfacs）；fordiv（n，d，if（（d>1）&&（d<=m），newfacs=List（facs）；列表输出（newfacs，d）；s+=A281116（n/d，d，newfacs））；（s））\\安蒂·卡尔图宁2018年9月8日

囊性纤维变性。A001055型,A007916号,A089233号,邮编：A162247,邮编：A259936,A281113号,A317751型.

的第一列A317748型.

上下文顺序：A236441号 A327695型 A319058型*A335447飞机 A089233号 A066620号

相邻序列：A281113号 A281114号 A281115型*A281117号 A281118号 A281119号

不

格斯·怀斯曼2017年1月15日

项a（1）=0，由安蒂·卡尔图宁2018年9月8日

经核准的