%I#10 2020年4月25日14:48:13
%S 12552772841817671206130046515463841686707958609540881,
%电话:399468507929520972723457072335,
%电话:421115359318925799023956835471072721335060514950065791377560292713280167442077153244196665651392169790340795231563272399566454175106315563265
%N从{N}^8开始到任意分量等于0结束的晶格路径数,使用将一个或多个分量减量一的步长。
%H Alois P.Heinz,n的表格,n=0..20的a(n)</a>
%p g():=序列(转换(n,基数,2)[1..8],n=257..511):
%pb:=proc(l)选项记忆;
%p`if`(l[1]=0,1,加(b(排序(l-h)),h=g()))
%p端:
%pa:=n->b([n$8]):
%p序列(a(n),n=0..8);
%t g[]=表格[Reverse[Integer Digits[n,2]][[;;8]],{n,2^8+1,2^9-1}];
%tb[l_]:=b[l]=如果[l[[1]]==0,1,和[b[Sort[l-h]],{h,g[]}]];
%t a[n_]:=b[表[n,{8}]];
%t a/@Range[0,8](*_Jean-François Alcover_,2020年4月25日,在_Alois P.Heinz_*之后)
%A263159的Y列k=8。
%K nonn公司
%0、2
%A _Alois P.Heinz,2015年10月11日
|