%I#16 2015年8月11日13:54:40
%S 1,1,2,1,2,8,1,2,12,24,1,2,16,40,80,1,2,20,56160256,1,2,24,72256,
%电话:576832,1,2,28,8836899221122688,1,2,32104496150439687552,
%电话:8704,1,2,36120640211264152322688028160,1,2,40136800
%N与A208748联合生成的多项式u(N,x)系数的三角;请参阅“公式”部分。
%C有关相关阵列的讨论和指南,请参阅A208510。
%C由(1,0,-1,1,0,0,0,0,0,0,0,…)Δ(0,2,2,-2,0,0,0,0,0,0,…)给出的三角形T(n,k)的减法,其中Δ是A084938中定义的运算符_菲利普·德雷厄姆(Philippe Deléham),2012年3月14日
%F u(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)=A208342(n,k)*2^k.-菲律宾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
%F G.F.:-x*y/(-1+2*x*y-2*x^2*y+4*x^2*y^2+x)_R.J.Mathar,2015年8月11日
%e前五行:
%e 1个
%e 1…2
%e 1…2…8
%e 1…2…12…24
%e 1…2…16…40…80
%e前五个多项式u(n,x):
%e 1个
%e 1+2倍
%e 1+2x+8x^2
%e 1+2x+12x^2+24x^3
%e 1+2x+16x^2+40x^3+80x^4
%e(1,0,-1,1,0,0,…)DELTA(0,0,0,-2,0,0…)开始:
%e 1个
%e 1,0
%e 1、2、0
%e 1、2、8、0
%e 1、2、12、24、0
%e 1、2、16、40、80、0
%e 1、2、20、56、160、256、0
%e 1、2、24、72、256、576、832、0_菲利普·德雷厄姆(Philippe Deléham),2012年3月14日
%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],x],{n,1,z}];
%t表格形式
%t压扁[%](*A208748*)
%Y参见A208748、A208510。
%K nonn,表
%O 1,3
%A_Clark Kimberling_,2012年3月2日
|