OEIS哀悼西蒙斯感谢西蒙斯基金会支持包括OEIS在内的许多科学分支的研究。
登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

徽标
提示
(来自的问候整数序列在线百科全书!)
A288388型 半长n的Dyck路径数,使得每个级别中的峰值数为斐波那契数。 2
1、1、2、5、13、41、120、389、1251、4137、13853、46808、159861、550275、1905212、6634122、23214226、81553913、287563509、1017218432、3608376287、12832434230、457397360100、163366352143、584561531878、2095201468853、7521163557074、27036493662583、97313177034670 (列表;图表;参考文献;;历史;文本;内部格式)
抵消
0,3
链接
阿洛伊斯·海因茨,n=0..600时的n,a(n)表
维基百科,计算晶格路径
维基百科,斐波那契数
例子
a(4)=13=A000108号(4) -1,因为半长4的一条Dyck路径在第一级有4个峰值,而4不是斐波那契数:/\/\/\。
MAPLE公司
q: =n->(t->发行量(t+4)或发行量(t-4))(5*n^2):
b: =proc(n,j)选项记忆`如果`(n=j,1,加上(b(n-j,i)*
加法(`if`(q(t),二项式(i,t)*二项式,
t=最大值(0,i-j)。。最小值(n-j,i-1),i=1..n-j)
结束时间:
a: =n->`if`(n=0,1,加(`if`,(q(k),b(n,k),0),k=1..n)):
seq(a(n),n=0..30);
数学
q[n_]:=函数[t,IntegerQ@Sqrt[t+4]||IntegerQ@Sqrt[t-4]][5n^2];
b[n_,j_]:=b[n,j]=如果[n==j,1,总和[b[n-j,i]*总和[If[q[t],二项式[i,t]*二项式[j-1,i-1-t],0],{t,最大值[0,i-j],最小值[n-j、i-1]}],{i,1,n-j}]];
a[n_]:=如果[n==0,1,和[If[q[k],b[n,k],0],{k,1,n}];
表[a[n],{n,0,30}](*Jean-François Alcover公司,2018年6月2日,来自Maple*)
交叉参考
囊性纤维变性。A000045号,A000108号,A288390型.
关键词
非n
作者
状态
已批准

查找|欢迎光临|维基|寄存器|音乐|地块2|演示|索引|浏览|更多|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索|最近
OEIS社区|维护人OEIS基金会。

许可协议、使用条款、隐私政策。.

上次修改时间:美国东部夏令时2024年5月13日07:22。包含372498个序列。(在oeis4上运行。)