|
|
1, 1, 1, 2, 1, 3, 1, 4, 2, 3, 1, 12, 1, 3, 4, 21, 1, 14, 1, 18, 4, 3, 1, 116, 3, 3, 12, 25, 1, 40, 1, 271, 4, 3, 4, 325, 1, 3, 4, 295, 1, 56, 1, 36, 47, 3, 1, 3128, 4, 32, 4, 44, 1, 407, 4, 566, 4, 3, 1, 1598, 1, 3, 65, 10656, 5, 90, 1, 54, 4, 84, 1
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
0,4
|
|
|
评论
|
整数分区的子多重集的数量是其重数的乘积，每个重数加一。
|
|
|
链接
|
|
|
|
例子
|
分区（4331）的12=11+1子多重集是：（），（1），（3），（4），（31），（33），（41），（43），（331）。
a（5）=3到a（11）=12分区：
221 111111 421 3311 22221 1111111111 4322
311 2221 11111111 51111 4331
11111 4111 111111111 4421
1111111 5411
6221
6311
7211
33311
44111
222221
611111
11111111111
|
|
|
MAPLE公司
|
b： =proc（n，i，p）选项记忆`如果`（n＝0或i＝1，
`如果`（n=p-1，1，0），加上（`如果`（irem（p，j+1，'r'）=0，
（w->b（w，min（w，i-1），r）（n-i*j），0），j=0..n/i））
结束：
a： =n->b（n$2，n+1）：
|
|
|
数学
|
表[Length[Select[Integer Partitions[n]，Times@@（1+Length/@Split[#]）-1==n&]]，{n，0，30}]
（*第二个节目：*）
b[n_，i_，p]：=b[n，i，p]=如果[n==0|i==1，如果[n==p-1，1，0]，和[If[Mod[p，j+1]==0，r=商[p，j+1]；函数[w，b[w，Min[w，i-1]，r]][n-i*j]，0]，{j，0，n/i}]]；
a[n]：=b[n，n，n+1]；
|
|
|
交叉参考
|
参见。A002033号,1988年8月59日,A126796号,A188431号,A325694型,A325792型,A325793型,A325830型,325831英镑,A325832型,A325833型,325834英镑,A325836型.
|
|
|
关键字
|
非n
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
|
