登录
A325832型
子集合数大于或等于n的n的整数分区数。
9
1, 1, 2, 2, 3, 4, 6, 8, 13, 16, 22, 35, 50, 58, 85, 120, 162, 199, 267, 347, 462, 592, 773, 1006, 1293, 1504, 1929, 2455, 3081, 3859, 4815, 5953, 7363, 8737, 10743, 13193, 16102, 19241, 23413, 28344, 34260, 40911, 49197, 58917, 70515, 84055, 100070, 118914
抵消
0,3
评论
分区的子多重集的数量是其多重性的乘积,每个多重集加一。
这些分区的Heinz数由下式给出A325796型.
链接
阿洛伊斯·海因茨,n=0..500时的n,a(n)表
配方奶粉
a(n)=A000041号(n)-A325833型(n) ●●●●。
对于n偶数,a(n)=A325831型(n)+A325830型(n/2);对于n奇数,a(n)=A325831型(n) ●●●●。
例子
a(1)=1到a(8)=13分区:
(1) (2) (21) (31) (221) (321) (421) (431)
(11) (111) (211) (311) (411) (2221) (521)
(1111) (2111) (2211) (3211) (3221)
(11111) (3111) (4111) (3311)
(21111) (22111) (4211)
(111111) (31111) (5111)
(211111) (22211)
(1111111) (32111)
(41111)
(221111)
(311111)
(2111111)
(11111111)
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->组合[numbpart](n)-加(b(n$2,k),k=0..n-1):
seq(a(n),n=0..55); #阿洛伊斯·海因茨2019年8月17日
数学
表[Length[Select[Integer Partitions[n],Times@@(1+Length/@Split[#])>=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,函数[w,b[w,Min[w,i-1],p/(j+1)]][n-i*j],0]、{j,0,n/i}]];
a[n_]:=分区P[n]-和[b[n,n,k],{k,0,n-1}];
表[a[n],{n,0,55}](*Jean-François Alcover公司2021年5月16日之后阿洛伊斯·海因茨*)
关键词
非n
作者
古斯·怀斯曼2019年5月25日
状态
经核准的