%I#10 2012年5月17日23:56:34
%S 1,0,1,0,1,1,0,2,2,1,0,5,6,3,1,0,15,21,12,4,1,0,53,82,54,20,5,1,0215,
%电话:351263110,30,6,1,097616301364644195,42,7,1,0485981517469,
%电话:39561335315,56,8,1,02615043627429712530495052470476,72,9,1
%N三角形,按行读取,其中第k列等于第1列的第k个自组成(A120567),k>=0,使得行和等于第1列。
%H Paul D.Hanna,<a href=“/A120568/b120568.txt”>行n=1..45,扁平</a>
%e第1列g.f.的连续迭代开始:
%e F(x)=x+x ^2+2*x ^3+5*x ^4+15*x ^5+53*x ^6+215*x ^7+976*x ^8+。。。
%e F(F(x))=x+2*x^2+6*x^3+21*x^4+82*x^5+351*x^6+1630*x^7+。。。
%e(F(F(x)))=x+3*x^2+12*x^3+54*x^4+263*x^5+1364*x^6+。。。
%e F(F(F,F(x)))=x+4*x^2+20*x^3+110*x^4+644*x^5+3956*x^6+。。。
%e F(F(F,F(x))))=x+5*x^2+30*x^3+195*x^4+1335*x^5+9505*x*6+。。。
%e三角形开始:
%e 1;
%e 0,1;
%e 0,1,1;
%e 0、2、2、1;
%e 0、5、6、3、1;
%e 0、15、21、12、4、1;
%e 0、53、82、54、20、5、1;
%e 0、215、351、263、110、30、6、1;
%e 0、976、1630、1364、644、195、42、7、1;
%电子邮箱:04859、8151、7469、3956、1335、315、56、8、1;
%电子邮箱:026150、43627、42971、25304、9505、2470、476、72、9、1;
%电子邮箱:0150585、248631、258976、167804、69899、20023、4207、684、90、10、1;
%e,其中k列等于第1列的第k个自组成。
%o(PARI){迭代(n,F,p=#F)=局部(G=x);对于(i=1,n,G=子集(F,x,G+x*o(x^p));G}
%o{T(n,k)=局部(F=x+x*o(x^n),G=F,H=x);对于(i=1,n,对于(j=1,n,G=子集(F,x,G);H=H+x^j*G);F=H;G=x+x*o(x ^n);H=G);波尔科夫(ITERATE(k,F),n-k)}
%o对于(n=1,15,对于(k=0,n-1,print1(T(n,k),“,”));打印(“”)
%Y参考A120567(第1列)。
%K nonn,表
%O 1,8型
%A _保罗·D·汉纳,2006年6月14日
|