A118399-OEIS公司

A118399号

不同分区三角形的特征向量(A008289年)，因此：a（n）=和{k=1..tri（n）}A008289年（n，k）*a（k）表示n>=1，a（1）=1，其中tri（n）=楼层（（sqrt（8*n+1）-1）/2）。

1, 1, 2, 2, 3, 5, 6, 8, 11, 15, 18, 24, 29, 37, 47, 57, 69, 86, 103, 125, 154, 183, 220, 264, 316, 375, 450, 533, 631, 747, 882, 1035, 1222, 1428, 1674, 1959, 2282, 2653, 3088, 3578, 4142, 4790, 5525, 6363, 7330, 8410, 9644, 11050, 12633, 14424, 16459, 18743

(列表;图表;参考;听;历史;文本;内部格式)

抵消

1,3

链接

阿洛伊斯·海因茨，n=1..1000时的n，a（n）表

MAPLE公司

b： =proc（n，i）b（n，i）：=`if`（n=0，[1]，`if`）（i<1，[]，zip（（x，y）

->x+y，b（n，i-1），`if`（i>n，[]，[0，b（n-i，i-1，[]]），0））

结束时间：

a： =proc（n）选项记忆；局部l；l： =b（n，n）；

`如果`（n=1，1，加（l[i+1]*a（i），i=1..nops（l）-1）

结束时间：

seq（a（n），n=1..60）#阿洛伊斯·海因茨，2012年11月18日

数学

zip=带有[{m=Max[Length[#1]，Length[2]]}，PadRight[#1，m]+PadRight[#2，m]]&；b[n_，i_]：=b[n，i]=如果[n==0，{1}，如果[i<1，{}，zip[b[n、i-1]，如果[i>n，{}，连接[{0}，b[n-i，i-1]]]]；a[n_]：=a[n]=（l=b[n，n]；如果[n==1，1，和[l[i+1]]*a[i]，{i，1，长度[l]-1}]]）；表[a[n]，{n，1，60}](*Jean-François Alcover公司2017年2月12日，之后阿洛伊斯·海因茨*)

黄体脂酮素

（PARI）｛a（n）=if（n＜0，0，if（n＝＝1，1，sum（k＝1，floor（（sqrt（8*n+1）-1）/2），a（k）*polcoeff（polcoeff（prod（i＝1，n，1+y*x^i，1+x*O（x^n）），n，x），k，y））｝

交叉参考

囊性纤维变性。A008289年.

上下文中的序列：A192432号 A121081号 A330952型*A278298型 178927年 A076571号

相邻序列：A118396号 A118397号 A118398号*18400英镑 A118401号 A118402号

关键字

非n

作者

保罗·D·汉纳2006年5月7日

状态

经核准的