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!)
A159710 Number of permutations of 1..n arranged in a circle with exactly 2 local maxima. 2

%I #20 Sep 08 2022 08:45:44

%S 0,0,0,0,8,80,528,2912,14592,69120,316160,1413632,6223872,27103232,

%T 117067776,502456320,2145517568,9122349056,38644678656,163186343936,

%U 687144960000,2886107922432,12094385684480,50577004298240,211105074905088,879606785638400

%N Number of permutations of 1..n arranged in a circle with exactly 2 local maxima.

%H Alois P. Heinz, <a href="/A159710/b159710.txt">Table of n, a(n) for n = 0..1000</a>

%H <a href="/index/Rec#order_05">Index entries for linear recurrences with constant coefficients</a>, signature (14,-76,200,-256,128).

%F G.f.: -8*(2*x^2-4*x+1)*x^4 / ((4*x-1)^2*(2*x-1)^3). - Maksym Voznyy (voznyy(AT)mail.ru), Jul 26 2009

%F a(n) = 2^(-5+n)*(4+2^n-4*n)*n for n>1. - _Colin Barker_, Oct 26 2015

%t LinearRecurrence[{14,-76,200,-256,128},{0,0,0,0,8,80,528},30] (* _Harvey P. Dale_, Sep 23 2017 *)

%t Join[{0,0}, Table[2^(-5+n)*(4+2^n-4*n)*n, {n, 2, 30}]] (* _G. C. Greubel_, Jun 02 2018 *)

%o (PARI) concat([0, 0, 0, 0], Vec(-8*(2*x^2-4*x+1)*x^4 / ((4*x-1)^2*(2*x -1)^3) + O(x^100))) \\ _Altug Alkan_, Oct 26 2015

%o (PARI) a(n) = if(n==1, 0, 2^(-5+n)*(4+2^n-4*n)*n) \\ _Colin Barker_, Oct 26 2015

%o (Magma) [0,0] cat [2^(-5+n)*(4+2^n-4*n)*n: n in [2..30]]; // _G. C. Greubel_, Jun 02 2018

%Y Column k=2 of A263789.

%K nonn,easy

%O 0,5

%A _R. H. Hardin_, Apr 20 2009

%E More terms from _Alois P. Heinz_, Oct 26 2015

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 March 28 10:55 EDT 2024. Contains 371241 sequences. (Running on oeis4.)