搜索: 编号:a325830
|
|
|
|
0, 1, 1, 1, 3, 1, 10, 1, 21, 12, 15, 1, 121, 1, 20, 37, 309, 1, 319, 1, 309, 47, 33, 1, 3435, 30, 38, 405, 593, 1, 1574, 1, 11511, 80, 51, 77, 17552, 1, 56, 92, 13921, 1, 3060, 1, 1439, 2911, 69, 1, 234969, 56, 2044, 126, 1998, 1, 46488, 114, 36615, 137, 87, 1, 141906
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
0,5
|
|
评论
|
如果n是奇数,则不存在n的整数分块和正好n个子多重集,因此该序列只给出偶数诱导项。
整数分区的子多重集的数量是其重数的乘积,每个重数加一。
|
|
链接
|
|
|
配方奶粉
|
|
|
例子
|
分区(7221)的12个子多重集是()、(1)、(2)、(7)、(21)、(22)、(71)、(72)、(221)、。
a(1)=1到a(8)=21分区(a=10,B=11):
(2) (31)(411)(431)(61111)(4332)(8111111)(6532)
(521) (4431) (6541)
(5111) (5322) (7432)
(5331) (7531)
(6411) (7621)
(7221) (8431)
(7311) (8521)
(8211) (9421)
(33222)(A321)
(711111) (44431)
(53332)
(63331)
(64222)
(73222)
(76111)
(85111)
(92221)
(94111)
(A3111)
(B2111)
(91111111)
|
|
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->`if`(i素数(n),1,b(2*n$3)):
|
|
数学
|
表[Length[Select[Integer Partitions[2*n],Times@@(1+Length/@Split[#])==2*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_]:=如果[PrimeQ[n],1,b[2n,2n,2n]];
|
|
黄体脂酮素
|
(PARI)a(n)={if(n<1,0,my(v=向量(2*n+1,k,向量(2*n)));v[1][1]=1;对于(k=1,2*n,forstep(j=#v,k,-1,对于(m=1,(j-1)\k,对于(i=1,2*n\(m+1),v[j][i*(m+1\\安德鲁·霍罗伊德2019年8月16日
|
|
交叉参考
|
囊性纤维变性。A002033号,A098859号,A108917号,A126796号,A237999型,A325694型,A325792型,A325793型,A325828型,A325831型,A325832型,A325833型,A325834型,A325836型.
|
|
关键词
|
非n
|
|
作者
|
|
|
扩展
|
|
|
状态
|
经核准的
|
|
|
搜索在0.006秒内完成
|