|
|
A327520型 |
| 第n个稳定数的因子分解数A316476型(n) 稳定数>1。 |
|
0
|
|
|
1, 1, 2, 1, 1, 3, 2, 1, 1, 2, 5, 1, 1, 1, 2, 3, 1, 1, 7, 2, 2, 1, 1, 1, 4, 1, 2, 2, 1, 2, 1, 1, 11, 1, 2, 1, 1, 4, 2, 1, 5, 1, 2, 1, 2, 2, 2, 1, 4, 1, 1, 1, 1, 1, 2, 2, 2, 3, 1, 15, 1, 7, 1, 1, 2, 2, 2, 1, 1, 4, 2, 1, 2, 1, 5, 1, 2, 1, 4, 2, 1, 1, 2, 1, 1, 1
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,3
|
|
评论
|
n的素数指数是一个数m,使得素数(m)除以n。n的多素数指数集是A112798号.如果一个数的不同素数指数是两两不可分的,则该数是稳定的。稳定的数字列在A316476型.
|
|
链接
|
|
|
例子
|
将45的a(26)=4分解为稳定数:
(3*3*5)
(3*15)
(5*9)
(45)
将495个素数指数的a(201)=11个多集划分为稳定多集:
{{2},{2},{3},{5}}
{{2},{2},{3,5}}
{{2},{3},{2,5}}
{{2},{5},{2,3}}
{{2},{2,3,5}}
{{3},{2,2},{5}}
{{3},{2,2,5}}
{{2,2},{3,5}}
{{5},{2,2,3}}
{{2,3},{2,5}}
{{2,2,3,5}}
|
|
数学
|
nn=100;
facsusing[s_,n_]:=如果[n<=1,{{}},连接@@表[Map[Prepend[#,d]&,Select[facsusing[Select[s,Divisible[n/d,#]&],n/d],Min@@#>=d&]],{d,Select[s,Diviible[n,#]&]}]];
稳定Q[u_,Q_]:=!应用[Or,Outer[#1=!=#2&&Q[#1,#2]&,u,u,1],{0,1}];
y=选择[Range[nn],stableQ[PrimePi/@First/@FactorInteger[#],Divisible]&];
表[Length[facsusing[Rest[y],n]],{n,y}]
|
|
交叉参考
|
有关其他交互参考,请参见链接。
|
|
关键词
|
非n
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|