%I#18 2017年8月30日09:37:51
%S 1,0,1,0,3,1,0,18,6,1,0135,45,9,1,1134378,81,12,1,0102063402,
%电话:756126,15,1,0962283207672901296180,18,1,093822331274172171,
%电话:133652025243,211,093822303127410729729813899622752970315,24,1,0
%N Riordan数组(1,x*c(3x)),c(x)A000108的g.f。
%C行总和是C(3;n),A064063。反向为A110517。对角线总和为A110525。
%H G.C.Greubel,n表,前50行的a(n),扁平</a>
%F数三角形:T(0,k)=0^k,T(n,k)=(k/n)*C(2n-k-1,n-k)*3^(n-k),n>0,k>0。
%F T(n,k)=A106566(n,k)*3^(n-k)_菲利普·德雷厄姆,2007年11月8日
%F三角形T(n,k),0<=k<=n,按行读取,由(0,3,3,3,3,3…)DELTA(1,0,0,0,0,0…)给出,其中DELTA是A084938中定义的运算符_菲利普·德雷厄姆,2014年9月23日
%e行开始
%e 1;
%e 0,1;
%e 0、3、1;
%e 0、18、6、1;
%e 0、135、45、9、1;
%e 0、1134、378、81、12、1;
%e。。。
%e生产矩阵开始:
%e 0,1;
%e 0、3、1;
%e 0、9、3、1;
%e 0、27、9、3、1;
%e 0、81、27、9、3、1;
%e 0、243、81、27、9、3、1;
%e…-_菲利普·德雷厄姆,2014年9月23日
%tT[0,0]:=1;T[0,k_]:=0;T[n_,k_]:=(k/n)*3^(n-k)*二项式[2*n-k-1,n-k];表[T[n,k],{n,0,20},{k,0,n}]//扁平(*_G.C.格鲁贝尔,2017年8月29日*)
%o(PARI)concat([1],表示(n=1,10,表示(k=0,n,print1((k/n)*3^(n-k)*二项式(2*n-k-1,n-k),“,”)))
%K轻松,不,tabl
%0、5
%A Paul Barry,2005年7月24日
|