A112972-OEIS公司

A112972号

集合{1,2，…，n}可以划分为三个等和子集的方式。

0, 0, 0, 0, 1, 1, 0, 3, 9, 0, 43, 102, 0, 595, 1480, 0, 9294, 23728, 0, 157991, 411474, 0, 2849968, 7562583, 0, 53987864, 145173095, 0, 1061533318, 2885383960, 0, 21515805520, 59003023409, 0, 447142442841, 1235311936936, 0, 9489835046489, 26382363207307 (列表；图表；参考；听；历史；文本；内部格式)

	抵消	`1,8`
	链接	`阿洛伊斯·海因茨，n=1..125时的n，a（n）表`
	配方奶粉	`a（n）是乘积中x^0y^0系数的1/6（x^（-2k）+x^k*（y^k+y^（-k））。`
	例子	`对于n=8，我们有84/75/6321、84/732/651和831/75/642，因此a（8）=3。`
	MAPLE公司	`A112972号：=n->系数（系数（mul（（x^（-2k）+x^k（y^k+y^（-k）））` `，k=1..n），x，0），y，0）/6：` `序列(A112972号（n），n=1..20）；` `#第二个Maple项目：` b： =proc（）选项记住；局部i，j，t`如果`（args[1]=0， `如果`（nargs=2，1，b（args[t]$t=2..nargs）），则添加( `如果`（args[j]-args[nargs]<0，0，b（排序（[seq（args[1]- `如果`（i=j，args[nargs]，0），i=1..nargs-1）]）[]， `args[nargs]-1）），j=1..nargs-1））` `结束时间：` a： =n->（m->`if`（irem（m，3）=0，b（（m/3）$3，n）/6，0））（n*（n+1）/2）： `seq（a（n），n=1..42）#阿洛伊斯·海因茨2009年9月3日`
	数学	`b[args_List]：=b[args]=模块[{nargs=Length[args]}，如果[args[[1]]==0，如果[nargs==2，1，b[args//Rest]]，总和[If[args[[j]]-最后的[args]<0，0，b[Append[Sort[Flatten[Table[args[[i]]-如果[i==j，最后的[ars]，0]，{i，1，nargs-1}]]，最后的[args]-1]]，{j，1，1，nargs-1}]]]；` `a[n_]：=如果[Mod[#，3]==0，b[{#/3，#/3，n}]/6，0]&[n（n+1）/2]；` `数组[a，42](Jean-François Alcover公司2020年10月30日之后阿洛伊斯·海因茨)`
	交叉参考	`囊性纤维变性。A112956号,A058377号.` `第k列=第3列，共列1975年2月14日.` `类似序列：A327448型,A327449型,A327450型.` `上下文中的序列：A021723美元 A343618飞机 A206160型A334191型 A258147型 A016673号` `相邻序列：A112969号 A112970型 A112971号A112973号 A112974号 A112975号`
	关键词	`非n`
	作者	`楼层van Lamoen2005年10月7日`
	扩展	`延伸超过a（25）阿洛伊斯·海因茨2009年9月3日`
	状态	`经核准的`