%I#22 2018年5月25日08:28:43
%S 1,0,1,1,2,5,15,27,761965481388362198942755375346205634,
%电话:56372915654094370226121919293398032994874987265668404,
%电话:74565247820950256885893104381655392574663352155413138879533704346413401044917168292
%N半长N的Dyck路径数,使得每个带峰值的电平正好有两个峰值。
%H Alois P.Heinz,n的表格,n=0..1000时的a(n)</a>
%H维基百科,<a href=“https://en.wikipedia.org/wiki/Lattice_path#计数_晶格路径“>计算晶格路径</a>
%e、。a(2)=1:/\/\。
%e、。
%e、。a(3)=1:/\/\
%e./\。
%e、。
%e、。a(4)=2:/\/\
%e./\/\/\
%e./\/\/\。
%e、。
%e、。a(5)=5:/\/\
%e./\/\/\
%e./\/\/\/\/\\
%e./\/\/\/\/\/\//\//\/\/\\/\。
%p b:=proc(n,j)选项记忆`如果`(n=j或n=0,1,
%p加上(b(n-j,i)*(二项式(j-1,i-1)+i*(i-1)/2*
%p二项式(j-1,i-3),i=1..分钟(j+3,n-j))
%p端:
%pa:=n->b(n,2):
%p序列(a(n),n=0..35);
%tb[n_,j_]:=b[n,j]=如果[n==j||n==0,1,和[b[n-j,i]*(二项式[j-1,i-1]+i*(i-1)/2*二项式[j-1,i-3]),{i,1,Min[j+3,n-j]}];
%ta[n]:=b[n,2];
%t表[a[n],{n,0,35}](*_Jean-François Alcover_,2018年5月25日,翻译自Maple*)
%Y参见A000108、A281874、A287845、A28784、A287963。
%A288108的Y列k=2。
%K非n
%0、5
%A _Alois P.Heinz,2017年6月1日
|