登录
A281116号
将n>=2分解为大于1且没有除1以外的公约数的因子的次数(按照惯例,a(1)=0)。
108
0, 0, 0, 0, 0, 1, 0, 0, 0, 1, 0, 2, 0, 1, 1, 0, 0, 2, 0, 2, 1, 1, 0, 3, 0, 1, 0, 2, 0, 4, 0, 0, 1, 1, 1, 5, 0, 1, 1, 3, 0, 4, 0, 2, 2, 1, 0, 5, 0, 2, 1, 2, 0, 3, 1, 3, 1, 1, 0, 8, 0, 1, 2, 0, 1, 4, 0, 2, 1, 4, 0, 9, 0, 1, 2, 2, 1, 4, 0, 5, 0, 1, 0, 8, 1, 1, 1, 3, 0, 8, 1, 2, 1, 1, 1, 7, 0, 2, 2, 5
抵消
1,12
评论
设(e1,e2,…,ek)是n的素数符号(即n=p^e1*q^e2*…*r^ek,对于某些素数,p,q,…,r)。那么a(n)是将多集合{e1x1,e2x2,…,ekxk}划分为多集合的方法的数目,这样就没有一个数字是1。.k存在于该集合分区的所有成员多集合中。 -Antti Karttunen公司,2018年9月8日
例子
a(6)=1:(2*3)
a(12)=2; (2*2*3) (3*4)
a(24)=3:(2*2*2x3)(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)(2x3*6)(3*3*4)(4*9)
a(96)=7:(2*2*2x2*2*3*3)(2*2*2*3*4)(2x2*3*8)(2X3*4*4)“(2*3*16)(3*4*8)”(3*32)。
数学
postfacs[n_]:=如果[n<=1,{{}},连接@@表[Map[Prepend[#,d]&,选择[postfacs[n/d],Min@@#>=d&]],{d,Rest[Divisors[n]]}];
表[Length[Select[postfacs[n],GCD@@#==1&]],{n,2,100}]
黄体脂酮素
(PARI)A281116号(n,m=n,facs=List([]))=如果(1==n,(1==gcd(Vec(facs))),我的(s=0,newfacs);对于div(n,d,如果(d>1)&&(d<=m),newfacs=列表(facs);listput(newfacs,d);秒+=A281116号(n/d,d,newfacs));(s); \\Antti Karttunen公司2018年9月8日
关键词
非n
作者
古斯·怀斯曼2017年1月15日
扩展
术语a(1)=0前面加Antti Karttunen公司2018年9月8日
状态
经核准的