OFFSET
0,3
COMMENTS
a(n) = Sum(k*A186358(n,k), k=0..n).
LINKS
Alois P. Heinz, Table of n, a(n) for n = 0..300
Emeric Deutsch and Sergi Elizalde, Cycle up-down permutations, arXiv:0909.5199 [math.CO], 2009; and also, Australas. J. Combin. 50 (2011), 187-199.
FORMULA
a(n) = n!*Sum(E(j-1)/j!, j=1..n), where E(i) = A000111(i) are the Euler (or up-down) numbers.
E.g.f.: -log(1-sin z)/(1-z).
a(n) ~ n! * (-log(1-sin(1))). - Vaclav Kotesovec, Oct 08 2013
EXAMPLE
a(3) = 10 because the permutations (1)(2)(3), (12)(3), (13)(2), (1)(23), (123), and (132) have a total of 3 + 2 + 2 + 2 + 0 + 1 = 10 up-down cycles.
MAPLE
g := -ln(1-sin(z))/(1-z): gser := series(g, z = 0, 25): seq(factorial(n)*coeff(gser, z, n), n = 0 .. 22);
MATHEMATICA
CoefficientList[Series[-Log[1-Sin[x]]/(1-x), {x, 0, 20}], x]* Range[0, 20]! (* Vaclav Kotesovec, Oct 08 2013 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Emeric Deutsch, Feb 28 2011
STATUS
approved