%I M1528 N0598#25 2015年3月27日03:23:48
%S 0,0,1,2,5,20115790621755160545135593849070686805912660508,
%电话:12702694075189579135710301990873110551139445487680,
%电话:917345570926087173760711075130903465634200972496457259714390232227300159352909727731210835365756957966074846118
%N长度为N的排列数的一半,正好有1个上升或下降序列。
%C(1/2)乘以12…n的排列数,从而正好出现以下情况之一:12,23。。。,(n-1)n,21,32。。。,n(n-1)。
%C部分金额似乎在A000239中_Ralf Stephan,2003年8月28日
%D F.N.David、M.G.Kendall和D.E.Barton,《对称函数和联合表》,剑桥,1966年,第263页。
%D J.Riordan,没有上升或下降序列的排列的重复。安。数学。统计师。36 (1965), 708-710.
%D N.J.A.Sloane,《整数序列手册》,学术出版社,1973年(包括该序列)。
%D N.J.A.Sloane和Simon Plouffe,《整数序列百科全书》,学术出版社,1995年(包括该序列)。
%H Alois P.Heinz,n表,n=0..200时的a(n)</a>
%F A002464中定义的S[n](t)中t^1的系数,除以2。
%F a(n)~exp(-2)*n!.-_瓦茨拉夫·科特索维奇,2014年9月11日
%p S:=proc(n)选项记忆`如果`(n<4,[1,1,2*t,4*t+2*t^2]
%p[n+1],展开((n+1-t)*S(n-1)-(1-t)*(n-2+3*t)*S
%p-(1-t)^2*(n-5+t)*S(n-3)+(1-t
%p端:
%p a:=n->系数(S(n),t,1)/2:
%p序列(a(n),n=0..30);#_Alois P.Heinz,2012年12月21日
%tS[n]:=S[n]=如果[n<4,{1,1,2*t,4*t+2*t^2}[[n+1]],展开[(n+1-t)*S[n-1]-(1-t)*(n-2+3*t)*S[2]-(1-t)^2*(n-5+t)*S[n-3]+(1-t;a[n_]:=系数[S[n],t,1]/2;表[a[n],{n,0,30}](*_Jean-François Alcover_,2014年3月10日,在_Alois P.Heinz_*之后)
%Y参见A002464、A086853。等于A086852/2。A010028的对角线。
%K nonn公司
%0、4
%A _N.J.A.斯隆_
|