|
|
|
|
1, 1, 1, 2, 2, 4, 5, 8, 10, 16, 20, 31, 39, 55, 71, 100, 125, 173, 218, 291, 366, 483, 600, 784, 971, 1244, 1538, 1957, 2395, 3023, 3693, 4605, 5604, 6942, 8397, 10347, 12471, 15235, 18309, 22267, 26619, 32219, 38414, 46216, 54941, 65838, 77958, 93076, 109908
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
0.4
|
|
评论
|
如果每个数字1到n都可以表示为分区部分的总和,则n的分区是完整的。这推广了完美分区,其中每个数字的表示必须是唯一的。
一个分区是完整的,如果每个部分不超过所有较小部分之和的1。(这包括最小部分,因此必须为1。)-富兰克林·T·亚当斯-沃特斯2007年3月22日
a(n+1)是n的分区数,使得每个部分不超过所有较小部分之和的2(推广亚当斯-沃特斯准则)。双射:由a(n+1)计数的每个分区必须包含一个1,删除后得到所需的分区n-布莱恩·霍普金斯2017年5月16日
|
|
链接
|
SeungKyung公园,完整分区《斐波纳契季刊》,第36卷(1998年),第354-360页。
|
|
配方奶粉
|
通用公式:1=和{n>=0}a(n)*x^n*产品{k=1..n+1}(1-x^k)-保罗·D·汉娜2012年3月8日
a(n)~exp(Pi*sqrt(2*n/3))/(4*sqert(3)*n)*(1-(平方(3/2)/Pi+25*Pi/(24*sqrt(6)))/sqrt(n)+(25/16-1679*Pi^2/6912)/n)-瓦茨拉夫·科特索维奇,2018年5月24日,延期至2019年11月2日
|
|
例子
|
有一个(5)=4个完整的分区,每个分区5个:
[1,1,1,1,1,1],[1,1,2],[1,2,2],以及[1,1,3]。
通用公式:1=1*(1-x)+1*x*(1-x)*(1-x^2)+1*x^2*。。。
a(1)=1到a(8)=10分区:
(1) (11)(21)(211)(221)(321)(421)(3221)
(111) (1111) (311) (2211) (2221) (3311)
(2111) (3111) (3211) (4211)
(11111) (21111) (4111) (22211)
(111111) (22111) (32111)
(31111) (41111)
(211111) (221111)
(1111111) (311111)
(2111111)
(11111111)
(结束)
|
|
MAPLE公司
|
isCompl:=proc(p,n)局部m,pers,reps,f,lst,s;代表:={};pers:=组合[置换](p);对于从1到nops(pers)的m,做lst:=op(m,pers);对于从1到nops(lst)的f,dos:=加(op(i,lst),i=1..f);reps:=代表联合{s};od;od;对于从1到n的m,如果在reps中不是m,则执行RETURN(false);fi;od;返回(true);结束时间:A126796号:=proc(n)局部prts,res,p;prts:=组合[分区](n);分辨率:=0;对于从1到nops(prts)的p,如果isCompl(op(p,prts),n),那么res:=res+1;fi;od;返回(res);结束:对于从1到40的n,执行printf(“%d%d”,n,A126796号(n) );od#R.J.马塔尔2007年2月27日
使用(组合):a:=proc(n)局部P,b,k,P,S,j:P:=分区(n):b:=0:对于k从1到numbpart(n)do P:=功率集(P[k]):S:={}:对于j从1到nops(P)do S:=S并集{add(P[j][i],i=1..nops(P[j)))}od:如果nops(S)=n+1,则b:=b+1否则b:=fi:od:结束:seq(a(n),n=1..30)#Emeric Deutsch公司2007年3月4日
with(组合):n:=15:P:=分区(n):b:=0:对于k从1到numbpart(n)do P:=功率集(P[k]):S:={}:对于j从1到nops(P)do S:=S并集{add(P[j][i],i=1..nops(P[j)))}od:如果nops(S)=n+1,则b:=b+1,否则b:=b:fi:od:b#Emeric Deutsch公司2007年3月4日
|
|
数学
|
T[n_,k_]:=T[n,k]=如果[k<=1,1,如果[n<2k-1,T[n;楼层[(n+1)/2]],T[n,k-1]+T[n-k,k]];
a[n_]:=T[n,楼层[(n+1)/2]];
nmz[y_]:=补集[Range[Total[y]],Total/@子集[y]]];表[Length[Select[Integer Partitions[n],nmz[#]=={}&]],{n,0,15}](*古斯·怀斯曼2023年10月14日*)
|
|
黄体脂酮素
|
(PARI){T(n,k)=如果(k<=1,1,如果(n<2*k-1,T(n)floor((n+1)/2)),T(n,k-1)+T(n-k,k))}
{a(n)=T(n,floor((n+1)/2))}/*如果修改为保存早期结果,这将是有效的。*//*富兰克林·T·亚当斯-沃特斯2007年3月22日*/
(PARI)/*作为g.f.中的系数:*/
{a(n)=局部(a=[1,1]);对于(i=1,n+1,a=concat(a,0);a[#a]=极坐标(1-和(m=1,#a,a[m]*x^m*prod(k=1,m,1-x^k+x*O(x^#a))),#a)
对于(n=0,50,打印1(a(n),“,”)/*保罗·D·汉娜2012年3月6日*/
(哈斯克尔)
导入数据。MemoCombinators(备忘录3、整数、备忘录)
a126796 n=a126796列表!!n个
a126796_list=映射(pMemo 1 1)[0..]其中
pMemo=memo3积分积分p
p _ _ 0=1
百万英镑
|k>最小m s=0
|否则=pMemo(s+k)k(m-k)+pMemo s(k+1)m
|
|
交叉参考
|
囊性纤维变性。A000041号,A018818号,A046663号,A047967号,A276024型,A304792型,A325799型,A365543型,A365658型,A365918型,A365921型.
|
|
关键词
|
非n,美好的
|
|
作者
|
|
|
扩展
|
|
|
状态
|
经核准的
|
|
|
|