登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
A242896型 由n组成的具有不同多重性的k个部分的数量T(n,k),其中计算部分时没有多重性;三角形T(n,k),n>=0,0<=k<=max{i:A000292号(i) <=n},按行读取。 10
1, 0, 1, 0, 2, 0, 2, 0, 3, 3, 0, 2, 10, 0, 4, 12, 0, 2, 38, 0, 4, 56, 0, 3, 79, 0, 4, 152, 60, 0, 2, 251, 285, 0, 6, 284, 498, 0, 2, 594, 1438, 0, 4, 920, 2816, 0, 4, 1108, 5208, 0, 5, 2136, 11195, 0, 2, 3402, 24094, 0, 6, 4407, 38523, 0, 2, 8350, 85182 (列表;图表;参考;;历史;文本;内部格式)
抵消
0,5
链接
阿洛伊斯·海因茨,行n=0..200,扁平
例子
T(5,1)=2:[1,1,1,1],[5]。
T(5,2)=10:[1,1,1,2],[1,1,2,1],[1,2,1,1],[2,1,1,1],[2,1,1,1],[12,2,2],[2,2,1][2,2,1]、[1,1,3]、[1,3,1]、[3,1,1]。
三角形T(n,k)开始于:
1;
0, 1;
0, 2;
0, 2;
0, 3, 3;
0, 2, 10;
0, 4, 12;
0, 2, 38;
0, 4, 56;
0, 3, 79;
0, 4, 152, 60;
MAPLE公司
b: =proc(n,i,s)选项记忆`如果`(n=0,则添加(j,j=s)!,
`if`(i<1,0,expand(add(`if`(j>0,j in s,0,`if`)(j=0,1,x)*
b(n-i*j,i-1,`if`(j=0,s,s并集{j}))/j!),j=0..n/i)))
结束时间:
T: =n->(p->seq(系数(p,x,i),i=0..度(p)))(b(n$2,{})):
seq(T(n),n=0..16);
数学
b[n_,i_,s_List]:=b[n,i,s]=如果[n==0,总计[s]!,如果[i<1,0,Expand[Sum[If[j>0&&MemberQ[s,j],0,If[j==0,1,x]*b[n-i*j,i-1,If[j==0,s,s~Union~{j}]]/j!],{j,0,n/i}]]];T[n_]:=函数[{p},表[系数[p,x,i],{i,0,指数[p,x]}][b[n,n,{}]];表[T[n],{n,0,16}]//展平(*Jean-François Alcover公司2015年2月11日之后阿洛伊斯·海因茨*)
交叉参考
行总和给出A242882型.
囊性纤维变性。A182485型(分区相同),A242887型.
关键词
非n,标签
作者
阿洛伊斯·海因茨2014年5月25日
状态
经核准的

查找|欢迎光临|维基|注册|音乐|地块2|演示|索引|浏览|更多|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索引擎|最近
OEIS社区|维护人OEIS基金会。

许可协议、使用条款、隐私政策。.

上次修改时间:2024年6月20日18:51 EDT。包含373532个序列。(在oeis4上运行。)