| 数据
|
0, 1, 1, 6, 11, 68, 177, 1215, 4059, 30733, 124408, 1027972, 4862600, 43450761, 234283662, 2247091674, 13563976285, 138780931929, 925063455844, 10044476018973, 73144254450840, 839146997933059, 6618306039456419
|
| 数学
|
f[n_,x_]:=斐波那契[n,x];
q[n_,k_]:=系数[(x+1)^n,x,k];(*帕斯卡三角形*)
r[0]=1;r[k_]:=和[q[k-1,i]r[k-1-i],{i,0,k-1}];
p[n_,k_]:=系数[f[n,x],x,k];
v[n]:=和[p[n,k]r[n-k],{k,0,n}]
表[v[n],{n,0,22}](*A193664号*)
表格形式[表格[q[i,k],{i,0,4},{k,0,i}]]
表[r[k],{k,0,8}](*A000110号*)
表格形式[表格[p[n,k],{n,0,4},{k,0,n}]]
|