显示1-1个结果(共1个)。
第页1
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 2, 2, 1, 1, 1, 1, 1, 2, 3, 5, 6, 8, 8, 9, 7, 7, 4, 3, 1, 1, 1, 1, 1, 2, 3, 6, 10, 17, 25, 38, 52, 73, 93, 121, 143, 172, 187, 205, 202, 201, 177, 158, 123, 99, 66, 47, 26, 17, 7, 4, 1, 1, 1, 1, 1, 2, 3, 6, 11, 22, 39, 70, 118, 200, 324, 526
例子
三角形开始:
1
1, 1;
1, 1, 1, 1;
1, 1, 1, 2, 2, 2, 1, 1;
1, 1, 1, 2, 3, 5, 6, 8, 8, 9, 7, 7, 4, 3, 1, 1;
1, 1, 1, 2, 3, 6, 10, 17, 25, 38, 52, 73, 93, 121, 143, 172, 187, ...
1, 1, 1, 2, 3, 6, 11, 22, 39, 70, 118, 200, 324, 526, 825, 1290, 1958, ...
1, 1, 1, 2, 3, 6, 11, 23, 45, 90, 171, 325, 598, 1097, 1972, 3531, 6225, ...
MAPLE公司
b: =proc(n,h)选项记忆`if`(n<2,n,`if`(h<1,0,`if'(n::奇数,0,
(t->t*(1-t)/2)(b(n/2,h-1))+加(b(i,h-1
结束时间:
A: =(n,k)->b(k+1,n):
seq(seq(A(n,k),k=0..2^n-1),n=0..6)#阿洛伊斯·海因茨2017年9月8日
数学
b[n_,h]:=b[n,h]=如果[n<2,n,如果[h<1,0,如果[OddQ[n],0,函数[t,t*(1-t)/2][b[n/2,h-1]]+和[b[i,h-1]*b[n-i,h-1],{i,1,n/2}]];
A[n_,k_]:=b[k+1,n];
搜索在0.004秒内完成
|