|
例子
|
前四行:
1
1 1
1 2个
1 3 6 3
总和=1+3+6+3=13=F(7);alt.总和=1-3+6-3=1=F(2)。
T(3.2)=F(3)C(3.2)=2*3=6。
(1,0,0,1,0,0,0,…)DELTA(0,1,1,1,-1,0,0/0,…)开始:
1
1, 0
1, 1, 0
1, 2, 2, 0
1、3、6、3、0
1, 4, 12, 12, 5, 0
1, 5, 20, 30, 25, 8, 0
1、6、30、60、75、48、13、0。(结束)
|
|
数学
|
(*第一个程序*)
u[1,x_]:=1;v[1,x_]:=1;z=13;
u[n,x_]:=u[n-1,x]+x*v[n-1、x];
v[n,x_]:=x*u[n-1,x]+(x+1)*v[n-1、x];
表[展开[u[n,x]],{n,1,z/2}]
表[展开[v[n,x]],{n,1,z/2}]
cu=表[系数列表[u[n,x],x]、{n,1,z}];
表格[cu]
表[展开[v[n,x]],{n,1,z}]
cv=表[系数列表[v[n,x],x]、{n,1,z}];
表格形式[cv]
(*第二个程序*)
表[Fibonacci[k+1]*二项式[n,k],{n,0,12},{k,0,n}]//展平(*G.C.格鲁贝尔,2019年7月11日*)
|