提出

经核准的

编辑

提出

b[x_，y_，t_，k_]：=b[x，y，t，k]=如果[y>x|y<0，0，如果[x==0，1，b[x-1，y-1，假，k]*如果[t，（x+k*y）/y，1]+b[x-1，y，假，k]+b[x-1，y+1，真，k]]；

a[n_]：=b[n，0，假，n]；

表[a[n]，{n，0，30}](*Jean-François Alcover公司，2017年6月10日，翻译自枫叶*）

经核准的

编辑

编辑

经核准的

维基百科，<a href=“http协议https（https）：//en.wikipedia.org/wiki/Motzkin_number“>Motzkin编号</a>

经核准的

编辑

编辑

经核准的

Alois P.Heinz，<a href=“/A266386型/b266386.txt“>n表，n=0..500时为a（n）</a>

维基百科，<a href=“http://en.wikipedia.org/wiki/Motzkin_number“>Motzkin编号</a>

a（n）=A258306型（n，n）。

分配给Alois P.Heinz

（x_p+n*y_p）/y_p的所有峰p上乘积长度n的所有Motzkin路径之和，其中x_p和y_p是峰p的坐标。

1, 1, 4, 11, 62, 243, 1575, 7721, 54985, 316407, 2427309, 15798261, 129072167, 927577835, 8008756470, 62499194297, 567017727805, 4747097031375, 45051331382395, 400942371431173, 3965769826314532, 37252002703698003, 382848953452815450, 3774255187367667473

0,3

b： =proc（x，y，t，k）选项记忆`如果`（y>x或y<0，0，

`如果`（x=0，1，b（x-1，y-1，false，k）*`如果`（t，（x+k*y）/y，1）

+b（x-1，y，false，k）+b（x-1，y+1，true，k））

结束：

a： =n->b（n，0，false，n）：

seq（a（n），n=0..30）；

的主对角线A258306型.

分配

非n

阿洛伊斯·海因茨2015年12月28日

经核准的

编辑