%I#5 2012年3月30日18:58:15

%S 1,2,2,3,4,4,4，7,10,8,5,11,20,24,16,6,16,35,54,56,32,7,22,56104140，

%电话128,64,8,29,84181294352288128,9,37120293552800864640256，

%U 10，461654499571610211220801408512,15,562206591562

%N与A209697联合生成的多项式v（N，x）系数三角；请参阅“公式”部分。

%C有关相关阵列的讨论和指南，请参阅A208510。

%F u（n，x）=x*u（n-1，x）+x*v（n-1、x），

%F v（n，x）=x*u（n-1，x）+（x+1）*v（n-1、x）+1，

%其中u（1，x）=1，v（1，x）=1。

%e前五行：

%第1页

%e 2…2

%e 3…4…4

%e 4…7…10…8

%e 5…11…20…24…16

%e前三个多项式v（n，x）：1，2+2x，3+4x+4x^2。

%tu[1，x_]：=1；v[1，x_]：=1；z=16；

%tu[n，x_]：=x*u[n-1，x]+x*v[n-1、x]；

%tv[n，x_]：=x*u[n-1，x]+（x+1）*v[n-1、x]+1；

%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压扁[%]（*A209697*）

%t表格[展开[v[n，x]]，{n，1，z}]

%t cv=表[系数列表[v[n，x]，{n，1，z}]；

%t表格[cv]

%t压扁[%]（*A209698*）

%Y参见A209697、A208510。

%K nonn，表

%O 1,2号机组

%2012年3月12日，金伯利百灵