登录
OEIS由OEIS基金会的许多慷慨捐助者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
A296050型 [n]的置换数p,使得min_{j=1..n}|p(j)-j|=1。
0, 0, 1, 2, 8, 40, 236, 1648, 13125, 117794, 1175224, 12903874, 154615096, 2007498192, 28075470833, 420753819282, 6726830163592, 114278495205524, 2055782983578788, 39039148388975552, 780412763620655061, 16381683795665956242, 360258256118419518680, 8283042472303599966974 (列表;图表;参考;;历史;文本;内部格式)
抵消
0,4
链接
阿洛伊斯·海因茨,n=0..450时的n、a(n)表
配方奶粉
a(n)=A000142号(n)-A001883号(n)-A002467号(n) 。
a(n)=A000166号(n)-A001883号(n) 。
a(n)=和{k=1..n}A323671型(n,k)。
a(n)是奇数<=>n{A016933号}.
a(n)是偶数{A047252号}.
例子
a(2)=1:21。
a(3)=2:231312。
a(4)=8:2143、2341、2413、3142、3421、4123、4312、4321。
a(5)=40:21453、21534、23154、23451、23514、24153、24513、24531、25134、25413、25431、31254、31452、31524、34152、34251、35124、35214、35412、35421、41253、41523、41532、43152、43251、43512、43521、45132、45213、45231、51234、51423、51432、53124、53214、53412、53421、54132、54213、54231。
MAPLE公司
b: =proc(s,k)选项记忆;(n->`if`(n=0,` if`(k=1,1,0),添加(
`如果`(n=j,0,b(s减去{j},min(k,abs(n-j))),j=s))(nops)
结束时间:
a: =n->b({$1..n},n):
seq(a(n),n=0..14);
#第二个Maple项目:
a: =n->(f->f(1)-f(2))(k->`如果`(n=0,1,线性代数[永久](
矩阵(n,(i,j)->`if`(abs(i-j)>=k,1,0)):
seq(a(n),n=0..14);
#第三个Maple项目:
g: =程序(n)g(n):=`if`(n<2,1-n,(n-1)*(g(n-1,+g(n-2)))结束:
h: =进程(n)h(n):=`if`(n<7,[1,0$3,1,4,29][n+1],n*h(n-1)+4*h(n-2)
-3*(n-3)*h(n-3
结束时间:
a: =n->g(n)-h(n):
seq(a(n),n=0..25);
数学
g[n_]:=g[n]=如果[n<2,1-n,(n-1)(g[n-1]+g[n-2])];
h[n_]:=h[n]=如果[n<7,{1,0,0,1,4,29}[[n+1]],
n小时[n-1]+4小时[n-2]-3(n-3)小时[n-3]+(n-4)小时[n-4]+
2(n-5)小时[n-5]-(n-7)小时[n-6]-h[n-7]];
a[n]:=g[n]-h[n];
表[a[n],{n,0,25}](*Jean-François Alcover公司,2021年8月30日,在第三个Maple项目之后*)
交叉参考
第k列=第1列,共列A299789型.
关键词
非n
作者
阿洛伊斯·海因茨2019年1月21日
状态
经核准的

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

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

上次修改时间:2024年4月20日00:58 EDT。包含371798个序列。(在oeis4上运行。)