登录
A340653型
n的平衡因子分解数。
42
1, 1, 1, 0, 1, 0, 1, 1, 0, 0, 1, 2, 1, 0, 0, 1, 1, 2, 1, 2, 0, 0, 1, 1, 0, 0, 1, 2, 1, 3, 1, 1, 0, 0, 0, 2, 1, 0, 0, 1, 1, 3, 1, 2, 2, 0, 1, 2, 0, 2, 0, 2, 1, 1, 0, 1, 0, 0, 1, 2, 1, 0, 2, 1, 0, 3, 1, 2, 0, 3, 1, 3, 1, 0, 2, 2, 0, 3, 1, 2, 1, 0, 1, 2, 0, 0, 0, 1, 1, 2, 0, 2, 0, 0, 0, 3, 1, 2, 2, 2, 1, 3, 1, 1, 3, 0, 1, 3, 1, 3, 0, 2, 1, 3, 0, 2, 2, 0, 0, 4
抵消
1,12
评论
如果因子>1的因式分解为空或其长度等于其最大欧米茄值,则该因式分解是平衡的(A001222号).
例子
n=120144192288432768的平衡因式分解:
3*5*8 2*8*9 3*8*8 4*8*9 6*8*9 8*8*12
2*2*30 3*6*8 4*6*8 6*6*8 2*8*27 2*2*8*24
2*3*20 2*4*18 2*8*12 2*8*18 3*8*18 2*3*8*16
2*5*12 2*6*12 4*4*12 3*8*12 4*4*27 2*4*4*24
3*4*12 2*2*2*24 4*4*18 4*6*18 2*4*6*16
2*2*3*16 4*6*12 4*9*12 3*4*4*16
2*12*12 6*6*12 2*2*12*16
2*2*2*36 2*12*18 2*2*2*2*48
2*2*3*24 3*12*12 2*2*2*3*32
2*3*3*16 2*2*2*54
2*2*3*36
2*3*3*24
3*3*3*16
数学
facs[n_]:=如果[n<=1,{{}},连接@@表[Map[Prepend[#,d]&,Select[facs[n/d],Min@@#>=d&]],{d,Rest[Divisors[n]]}];
表[Length[Select[facs[n],#=={}| | Length[#]==Max[PrimeOmega/@#]&]],{n,100}]
黄体脂酮素
(PARI)A340653型(n,m=n,mbo=0,e=0)=如果(1==n,mbo==e,sumdiv(n,d,if(d>1)&&(d<=m),A340653型(n/d,d,最大值(mbo,bigomega(d),1+e)); \\安蒂·卡图恩2023年10月22日
交叉参考
零的位置为A001358号.
非零项的位置为A100959号.
联合平衡版本是A340596型.
取最大因子而不是Omega的最大值A340599型.
交叉平衡型为A340654型.
双平衡版本是A340655型.
A001055号计算因子分解。
A045778号计算严格因子分解。
A316439型按乘积和长度计算因子分解。
A320655型将因子分解计算为半素数。
其他与余额相关的序列:
-A010054号统计平衡的严格分区。
-A047993号统计平衡分区数。
-A098124号计算平衡的成分。
-A106529号列出了平衡分区的Heinz数。
-A340597型进行alt-balanced factorization。
-A340598型统计平衡集分区数。
-A340600型统计未标记的平衡多集分区。
-A340656型没有二次平衡因子分解。
-A340657型进行二次平衡因子分解。
关键词
非n
作者
古斯·怀斯曼2021年1月15日
扩展
数据段扩展到a(120)安蒂·卡图恩2023年10月22日
状态
经核准的