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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A307269型 对于从2到n的所有i,使|p(i)-p(i-1)|位于{2,5}中的[n]的置换p的数目。
1、1、0、0、0、2、14、12、8、28、58、44、120、254、226、344、932、1262、1380、2958、5006、5632、9496、18204、23756、32758、59992、90494、118740、196318、320814、437270、653770、1077580、1570054、2233920、3551168、5426452、7714408、11709864 (列表;图表;参考;;历史;文本;内部格式)
抵消
0,7
评论
对于n>1,a(n)/2是顶点集为{1,…,n}的图上的哈密顿路径数,其中i与j iff|i-j|相邻,位于{2,5}。
链接
例子
a(6)=2:246135531642。
a(7)=14:1357246、1642753、2461357、2753164、3164275、3572461、4275316、4613572、5316427、5724613、6135724、6427531、7246135、7531642。
a(8)=12:13572468、13864275、16427538、16835724、42753168、42753861、57246138、57246831、83164275、83572461、86135724、86427531。
a(9)=8:168357249168357942249753168249753861 861357249861357942942753168942753861。
MAPLE公司
b: =proc(s,l)选项记忆`如果`(s={},1,添加(
`如果`(abs(l-j)in{2,5},b(s减去{j},j),0),j=s))
结束时间:
a: =proc(n)选项记忆;如果n=0,则为1
加(b({$1.n}减去{j},j),j=1.n)fi
结束时间:
seq(a(n),n=0..20);
数学
b[s_,l_]:=b[s,l]=如果[s=={},1,和[If[MemberQ[{2,5},Abs[l-j]],b[s~补码~{j},j],0],{j,s}]];
a[n_]:=a[n]=如果[n==0,1,和[b[Range[n]~补码~{j},j],{j,n}]];
表[打印[n,“”,a[n]];a[n],{n,0,27}](*Jean-François Alcover公司2021年10月23日之后阿洛伊斯·海因茨*)
交叉参考
囊性纤维变性。A174703号,A302118型,A328648型.
关键词
非n
作者
阿洛伊斯·海因茨,2019年4月1日
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年6月10日10:32。包含373264个序列。(在oeis4上运行。)