搜索: a26316-编号:a263166
|
|
A263159号
|
| 从{n}^k开始,当k或任何分量等于0时结束的晶格路径数A(n,k),使用将一个或多个分量减少一的步长;方阵A(n,k),n>=0,k>=0。 |
|
+10 19
|
|
|
1, 1, 1, 1, 1, 1, 1, 3, 1, 1, 1, 7, 13, 1, 1, 1, 15, 157, 63, 1, 1, 1, 31, 2101, 5419, 321, 1, 1, 1, 63, 32461, 717795, 220561, 1683, 1, 1, 1, 127, 580693, 142090291, 328504401, 9763807, 8989, 1, 1, 1, 255, 11917837, 39991899123, 944362553521, 172924236255, 454635973, 48639, 1, 1
(列表;桌子;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
0,8
|
|
链接
|
|
|
例子
|
方阵A(n,k)开始:
1, 1, 1, 1, 1, 1, ...
1, 1, 3, 7, 15, 31, ...
1, 1, 13, 157, 2101, 32461, ...
1, 1, 63, 5419, 717795, 142090291, ...
1, 1, 321, 220561, 328504401, 944362553521, ...
1, 1, 1683, 9763807, 172924236255, 7622403922836151, ...
|
|
MAPLE公司
|
s: =proc(n)选项记忆`如果`(n=0,{[]},
映射(x->[[x[],0],[x[[],1]][],s(n-1))
结束时间:
b: =proc(l)选项记忆`如果`(l=[]或l[1]=0,1,
加法((p->`if`(p[1]<0,0,`if`)(p[1]=0,1,b(p)))
)(排序(l-x)),x=s(nops(l))减去{[0$nops(1)]})
结束时间:
A: =(n,k)->b([n$k]):
seq(seq(A(n,d-n),n=0..d),d=0..10);
|
|
数学
|
g[k_]:=表格[Reverse[Integer Digits[n,2]][[;;k]],{n,2^k+1,2^(k+1)-1}];
b[l]:=b[l]=如果[l[[1]]==0,1,和[b[Sort[l-h]],{h,g[k]}]];
a[n_,k_]:=如果[n==0||k==0| | k==1,1,b[表[n,{k}]];
|
|
交叉参考
|
|
|
关键词
|
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
搜索在0.006秒内完成
|