%I#28 2014年12月30日09:55:40

%S 1,1,1,2,1,1,3,5,1,1,8,7,9,1,15,33,12,14,11,48,57,87,18,20,1105，

%电话：279141185，25，27，1，138456975285345，33，35，1，94528951830，

%电话：2640510588，42,44,13840651264546806090840938，52,54,1,1

%N按行读取的三角形：T（N，k）=T（N-1，k-1）+N*T（N-2，k）；如果k>n或k<0，T（0,0）=T（1,0）=T（1,1）=1，T（n，k）=0。

%C三角形A180048与三角形A180049混合。

%C设p（n，x）为多项式，其系数由第n行给出；例如，p（2，x）=2+x+x^2；则p（n，x）是由f（n，x）=x+（n-1）/f（n-1，x）给出的有理函数的分子，其中f（x，0）=1。（第n行中的数字总和）=A000885（n），对于n>=1。（第1列）=A006882（第n项=n！！表示n>=0）-Clark Kimberling_，2014年10月19日

%H Clark Kimberling，第0..100行，平铺</a>

%F T（n，k）=T（n-1，k-1）+n*T（n-2，k）；如果k>n或k<0，T（0,0）=T（1,0）=T（1,1）=1，T（n，k）=0。

%F T（n，0）=A006882（n）。

%F T（n+1，1）=A007911（n+3）。

%F和{k=0..n}T（n，k）=A000085（n+1）。

%e三角形开始（0<=k<=n）：

%第1页

%e 1，1

%e 2、1、1

%e 3、5、1、1

%e第8、7、9、1、1页

%e第15、33、12、14、1、1页

%e第48、57、87、18、20、1、1页

%e 105、279、141、185、25、27、1、1

%e 384、561、975、285、345、33、35、1、1

%e 945、2895、1830、2640、510、588、42、44、1、1

%e 3840、6555、12645、4680、6090、840、938、52、54、1、1

%e 10395、35685、26685、41685、10290、12558、1302、1422、63、65、1、1

%tt[0,0]=1；t[1,0]=1；t[1,1]=1；t[n_，k_]：=t[n，k]=如果[k>n||k<0，0，t[n-1，k-1]+n*t[n-2，k]]；表[t[n，k]，{n，0，10}，{k，0，n}]（*_百灵金伯利，2014年10月19日*）

%t（*接下来是多项式*）；z=20；f[x_，n]：=x+n/f[x，n-1]；f[x_，0]=1；t=表[因子[f[x，n]]，{n，0，z}]；u=分子[t]；TableForm[Rest[Table[CoefficientList[u[[n]]，x]，｛n，0，z｝]]（*A249057数组*）

%t压扁[系数列表[u，x]]（*A249057序列*）

%t（*_百灵金伯利，2014年10月19日*）

%Y参考A180048、A180049。

%K nonn，表

%0、4

%A _Philippe Deléham，2013年10月28日

%E由_Clark Kimberling_修订，2014年10月21日