The OEIS mourns the passing of Jim Simons and is grateful to the Simons Foundation for its support of research in many branches of science, including the OEIS.
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!)
A292171 Number of permutations p of [n] such that 0p has a nonincreasing jump sequence beginning with five. 2
16, 47, 117, 327, 988, 3392, 8739, 21372, 53596, 135791, 362528, 887060, 2117839, 4997836, 11731828, 28229247, 66196942, 152418888, 347010327, 784580873, 1794241712, 4064606075, 9109879761, 20253187230, 44774963928, 99368298849, 219638865759, 482519177252 (list; graph; refs; listen; history; text; internal format)
OFFSET
5,1
COMMENTS
An up-jump j occurs at position i in p if p_{i} > p_{i-1} and j is the index of p_i in the increasingly sorted list of those elements in {p_{i}, ..., p_{n}} that are larger than p_{i-1}. A down-jump j occurs at position i in p if p_{i} < p_{i-1} and j is the index of p_i in the decreasingly sorted list of those elements in {p_{i}, ..., p_{n}} that are smaller than p_{i-1}. First index in the lists is 1 here.
LINKS
EXAMPLE
a(5) = 16: 51234, 51324, 51342, 51423, 51432, 52134, 52314, 52341, 52413, 52431, 53124, 53142, 53214, 53241, 53421, 54321.
a(6) = 47: 512346, 513246, 513426, 513462, 513624, ..., 543216, 543261, 543621, 546321, 564321.
MAPLE
b:= proc(u, o, t) option remember; `if`(u+o=0, 1,
add(b(u-j, o+j-1, j), j=1..min(t, u))+
add(b(u+j-1, o-j, j), j=1..min(t, o)))
end:
a:= n-> b(0, n, 5)-b(0, n, 4):
seq(a(n), n=5..50);
CROSSREFS
Column k=5 of A291684.
Sequence in context: A204616 A204800 A194268 * A204609 A233063 A208634
KEYWORD
nonn
AUTHOR
Alois P. Heinz, Sep 10 2017
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 15 11:50 EDT 2024. Contains 372540 sequences. (Running on oeis4.)