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

 


1964年2月
行读取三角形:T(n,k)是n的分区数,其中k个部分具有偶数重数。
4
1, 1, 1, 1, 3, 2, 3, 5, 2, 6, 4, 1, 9, 6, 9, 11, 2, 16, 13, 1, 20, 15, 7, 25, 28, 3, 32, 33, 11, 1, 40, 52, 9, 54, 55, 24, 2, 69, 82, 25, 84, 101, 40, 6, 101, 148, 46, 2, 136, 163, 73, 13, 156, 239, 89, 6, 202, 274, 127, 23, 1, 244, 364, 170, 14, 306, 437, 211, 46, 2
抵消
0,5
评论
T(n,0)=A055922号(n) ●●●●。
行总和给出A000041号. -奥马尔·波尔,2015年11月21日
链接
阿洛伊斯·海因茨,行n=0..1000,扁平
配方奶粉
G.f.:G(t,x)=产品{j>=1}((1+x^j-x^(2j)+tx^。
例子
T(6,1)=4,因为我们有[4,1*,1],[3*,3],[2,1*,1,1,1],和[1*,1,1,1,1](标有偶数的部分)。
三角形起点:
1;
1;
1, 1;
三;
2, 3;
5, 2;
6, 4, 1;
...
MAPLE公司
g:=乘积(1+x^j/(1-x^(2*j))+t*x^。。100):gser:=simplify(series(g,x=0,30)):对于n from 0 to 28 do P[n]:=sort(coeff(gser,x,n))end do:对于n from 0 to 28 do seq(coef(P[n',t,j),j=0。。度(P[n])结束do;#以三角形形式生成序列
#第二个Maple项目:
b: =proc(n,i)选项记忆`如果`(n=0,1,`如果`(i<1,0,添加(
展开(`if`(j>0且j::偶数,x,1)*b(n-i*j,i-1)),j=0..n/i))
结束时间:
T: =n->(p->seq(系数(p,x,i),i=0..度(p))(b(n$2)):
seq(T(n),n=0..30)#阿洛伊斯·海因茨2015年11月25日
数学
b[n_,i_]:=b[n,i]=如果[n==0,1,如果[i<1,0,Sum[Expand[If[j>0&&EvenQ[j],x,1]*b[n-i*j,i-1]],{j,0,n/i}]];T[n_]:=函数[p,表[系数[p,x,i],{i,0,指数[p,x]}][b[n,n]];表[T[n],{n,0,30}]//扁平(*Jean-François Alcover公司2015年12月25日,之后阿洛伊斯·海因茨*)
黄体脂酮素
(PARI)
T(n)={Vec(prod(k=1,n,(1+x^k-x^(2*k)+y*x^
{my(t=t(10));对于(n=1,#t,打印(Vecrev(t[n]));}\\安德鲁·霍罗伊德2017年12月22日
关键词
非n,,标签
作者
Emeric Deutsch公司,2015年11月21日
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年9月21日19:38。包含376089个序列。(在oeis4上运行。)