%I#10 2018年5月29日08:28:36

%S 1,1,2,5,10,28,71194532149542561217635251102664300260，

%电话：8819092599948768816422788527676144201308938599676445，

%电话：178856403853990590415956230705477132655361427632406642739008596312800582562943532884686

%半长度为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（3）=2:/\/\

%e./\/\/\/\。

%e、。

%e。a（4）=5:/\/\//\//\/\

%e./\/\/\/\//\//\\/\/\\/\/\\/\。

%p b:=proc（n，j）选项记忆`如果`（n=j，1，加上(

%p b（n-j，i）*i*（二项式（j-1，i-2）+（i-1）/2*

%p二项式（j-1，i-3），i=2..分钟（j+3，n-j））

%p端：

%p a:=n->`如果`（n=0，1，b（n，1）+b（n、2））：

%p序列（a（n），n=0..35）；

%t b[n，j_]：=b[n，j]=如果[n=j，1，和[b[n-j，i]*i*（二项式[j-1，i-2]+（i-1）/2*二项式[j-1，i-3]），{i，2，Min[j+3，n-j]}]]；

%t a[n]：=如果[n=0，1，b[n，1]+b[n，2]]；

%t表[a[n]，{n，0，35}]（*_Jean-François Alcover_，2018年5月29日，来自Maple*）

%Y参见A000108、A281874、A287843、A28784、A28786。

%K nonn公司

%0、4

%A _Alois P.Heinz，2017年6月3日