|
|
A350942型 |
| 奇数部分的数目减去具有Heinz数n的整数分区的偶数共轭部分的数目。 |
|
20
|
|
|
0, 1, 0, 1, 1, 0, 0, 3, -2, 1, 1, 2, 0, 0, -1, 3, 1, 0, 0, 3, -2, 1, 1, 2, -1, 0, 0, 2, 0, 1, 1, 5, -1, 1, -2, 0, 0, 0, -2, 3, 1, 0, 0, 3, 1, 1, 1, 4, -4, 1, -1, 2, 0, 0, -1, 2, -2, 0, 1, 1, 0, 1, 0, 5, -2, 1, 1, 3, -1, 0, 0, 2, 1, 0, 1, 2, -3, 0, 0, 5, -2, 1
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,8个
|
|
评论
|
分区的Heinz数(y_1,…,y_k)是质数(y_1)**质数(yk)。这给出了正整数和整数分区之间的双向对应。
|
|
链接
|
|
|
例子
|
使a(n)=6、5、4、3、2、1、0、-1、-2、-3、-4、-5、-6的第一个位置n及其素数指数为:
192: (2,1,1,1,1,1,1)
32: (1,1,1,1,1)
48: (2,1,1,1,1)
8: (1,1,1)
12: (2,1,1)
2: (1)
1: ()
15: (3,2)
9: (2,2)
77: (5,4)
49: (4,4)
221: (7,6)
169: (6,6)
|
|
数学
|
素数MS[n_]:=如果[n==1,{},扁平[Cases[FactorInteger[n],{p_,k_}:>表[PrimePi[p],{k}]]];
conf[y_]:=如果[Length[y]==0,y,表[Length[Select[y,#>=k&]],{k,1,Max[y]}];
表[Count[primeMS[n],_?奇数Q]-计数[cong[primeMS[n]],_?EvenQ],{n,100}]
|
|
交叉参考
|
以下列组分区:
囊性纤维变性。A026424号,A028260型,A130780号,A171966号,A239241型,A241638型,A325700型,A350947,A350949型,A350950型,A350951型.
|
|
关键词
|
签名
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|