%I#17 2015年8月11日13:56:35
%S 1,0,4,0,2,12,0,2,8,40,0,2,8,40128,0,8,48160416,0,2,8,56208640,
%电话1344,0,2,8,6425692824324352,0,2,8,7230412483840908814080,0,
%U 2,8,8035216005504156163328045568,0,2,8,8840019847424单元
%N与A208747联合生成的多项式v(N,x)系数三角;请参阅“公式”部分。
%C有关相关阵列的讨论和指南,请参阅A208510。
%C作为0≤k≤n的三角形T(n,k),它是(0,1/2,1/2,0,0,零,0,O,0,…)DELTA(4,-1,-1,0,0-0,0-,0-…),其中DELTA是A084938中定义的运算符_菲利普·德雷厄姆(Philippe Deléham),2012年3月14日
%Fu(n,x)=u(n-1,x)+2x*v(n-1,x),
%F v(n,x)=2x*u(n-1,x)+2x*v(n-1、x),
%其中u(1,x)=1,v(1,x)=1。
%F T(n,k)=2^k*A208343(n,k)-_Philippe Deléham,2012年3月5日
%F T(n,k)=T(n-1,k)+2*T(n-1,k-1)-2*T(n-2,k-1
%财务报表:(-1+x-2*x*y)*x*y/(-1+x+2*x*y-2*x^2*y+4*x^2*y^2)_R.J.Mathar,2015年8月11日
%e前五行:
%e 1个
%e 0…4
%e 0…2…12
%e 0…2…8…40
%e 0…2…8…40…128
%e前五个多项式v(n,x):
%e 1个
%e 4倍
%e 2x+12x^2
%e 2x+8x^2+40x^3
%e 2x+8x^2+40x^3+128x^4
%tu[1,x_]:=1;v[1,x_]:=1;z=16;
%tu[n,x_]:=u[n-1,x]+2x*v[n-1、x];
%tv[n,x_]:=2 x x x u[n-1,x]+2 x x v[n-1,x];
%t表格[展开[u[n,x]],{n,1,z/2}]
%t表格[展开[v[n,x]],{n,1,z/2}]
%t cu=表[系数列表[u[n,x],x]、{n,1,z}];
%t表格[cu]
%t压扁[%](*A208747*)
%t表格[展开[v[n,x]],{n,1,z}]
%t cv=表[系数列表[v[n,x],{n,1,z}];
%t表格[cv]
%t压扁[%](*A208748*)
%Y参见A208747、A208510。
%K nonn,表
%氧1,3
%A_Clark Kimberling_,2012年3月2日
|