%I#2012年3月30日5日18:57:39
%S 1,5,1,19,7,1,65,33,9,1211131,51,1665473233,73,13,120591611,
%电话939379,99,15,16305528134891697577129,17,1191711686712259,
%电话:68832851835163,19,15802552905413852602512545211161
%N三角形A193860的镜子。
%C A193861是通过颠倒三角形A193860的行获得的。
%F写下A193860处三角形的w(n,k)。A193861处的三角形由w(n,n-k)表示。
%e前六行:
%第1页
%e 5….1
%e 19….7….1
%e 65….33….9….1
%e 211…131…51…11…1
%e 665…473…233…73…13…1
%tz=10;
%tp[n,x_]:=(2x+1)^n;
%tq[0,x]:=1;q[n,x]:=x*q[n-1,x]+1;
%t p1[n_,k_]:=系数[p[n,x],x^k];
%t p1[n,0]:=p[n,x]/。x->0;
%td[n,x_]:=和[p1[n,k]*q[n-1-k,x],{k,0,n-1}]
%t h[n_]:=系数列表[d[n,x],{x}]
%t表格形式[表格[反向[h[n]],{n,0,z}]]
%t压扁[Table[Reverse[h[n]],{n,-1,z}]](*A193860*)
%t表格形式[表格[h[n],{n,0,z}]]
%t压扁[表[h[n],{n,-1,z}]](*A193861*)
%Y参考A193860。
%K nonn,表
%0、2
%A_Clark Kimberling_,2011年8月7日