%I#7 2012年3月30日18:37:42
%S 1,1,-1,-1,2,-2,1,-4,6,-6,-1,6,-18,24,-24,1,-9,36,-96120,-120,-1,12,
%T-72240、-600720、-720,1、-16120、-6001800、-43205040、-5040、-1,20、,
%U-2001200、-54015120、-3528040320、-40320,1、-25300、-240012600
%N三角形,由分子多项式的系数构成,通过迭代f(u,v)=1/u-x*v定义,并将其应用于元素列表{1,2,3,4,…}。
%F表[(-1)^(r+c+1)二项式[楼层[(r+c)/2],楼层[(r-c)/2]]楼层[(r+c+1)/2]!/地板[(r-c+1)/2]!,{r,0,7},{c,0,r}]
%F a[0]:=-1;a[1]:=1-x;a[n]:=a[n]=n x a[n-1]+a[n-2](匹配除a[0]之外的序列)。
%e 1,1-x,-1+2*x-2*x^2,1-4*x+6*x^2-6*x^3。。。
%t系数列表[#,x]和/@分子[FoldList[(1/#1-x#2)&,1,范围[12]//一起]
%t FoldList[(1/#1-x#2)&,1,Range[4]//一起(一个更简单的版本,显示有理函数)
%Y对角线给出A000142、A001563、A001286、A001809、A001754、A001810、A00175、A00181、A001777。除第一项外,行总和为负数A058307。
%Y行正数项之和表示A001053,负数项之总和表示-1*A001040。
%Ksign,tabl,轻松,漂亮
%0、5
%2001年1月27日举行的对外会议
|