login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A302896 Number of permutations of [n] having exactly three alternating descents. 2
5, 26, 182, 1196, 8699, 67054, 556952, 4945368, 46901985, 473324450, 5068610666, 57423496708, 686431008183, 8636011443670, 114084907758220, 1579087434474288, 22855092931547133, 345270138380243850, 5434925832561946750, 89001957427837012060 (list; graph; refs; listen; history; text; internal format)
OFFSET

4,1

COMMENTS

Index i is an alternating descent of permutation p if either i is odd and p(i) > p(i+1), or i is even and p(i) < p(i+1).

LINKS

Alois P. Heinz, Table of n, a(n) for n = 4..483

D. Chebikin, Variations on descents and inversions in permutations, The Electronic J. of Combinatorics, 15 (2008), #R132.

FORMULA

a(n) ~ (4 - Pi)^3 * 2^(n + 5/2) * n^(n + 7/2) / (3! * Pi^(n + 7/2) * exp(n)). - Vaclav Kotesovec, Apr 29 2018

E.g.f.: (6*cos(x)^2 + (3*x^2 - 12*x + 6*sin(x) + 6)*cos(x) + (x^3 - 6*x^2 + 18*x - 12)*sin(x) + 2*x^3 - 12*x^2 + 18*x - 12)/(6*cos(x)^2 + 12*sin(x) - 12). - Vaclav Kotesovec, Apr 30 2018

EXAMPLE

a(4) = 5: 2143, 3142, 3241, 4132, 4231.

a(5) = 26: 12435, 12534, 13425, 13524, 14523, 21345, 21543, 23415, 23514, 24513, 31245, 31542, 32541, 34512, 41235, 41532, 42531, 43215, 43521, 51234, 51432, 52431, 53214, 53421, 54213, 54312.

MAPLE

b:= proc(u, o) option remember; series(`if`(u+o=0, 1,

       add(b(o+j-1, u-j)*x, j=1..u)+

       add(b(o-j, u-1+j),   j=1..o)), x, 5)

    end:

a:= n-> coeff(b(n, 0), x, 4):

seq(a(n), n=4..30);

MATHEMATICA

nmax = 25; Drop[CoefficientList[Series[(6*Cos[x]^2 + (3*x^2 - 12*x + 6*Sin[x] + 6)*Cos[x] + (x^3 - 6*x^2 + 18*x - 12)*Sin[x] + 2*x^3 - 12*x^2 + 18*x - 12)/(6*Cos[x]^2 + 12*Sin[x] - 12), {x, 0, nmax}], x] * Range[0, nmax]!, 4] (* Vaclav Kotesovec, Apr 30 2018 *)

CROSSREFS

Column k=4 of A145876.

Sequence in context: A094422 A346545 A179513 * A175151 A121750 A143341

Adjacent sequences:  A302893 A302894 A302895 * A302897 A302898 A302899

KEYWORD

nonn

AUTHOR

Alois P. Heinz, Apr 15 2018

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified May 17 10:16 EDT 2022. Contains 353745 sequences. (Running on oeis4.)