OFFSET
0,5
REFERENCES
J. Riordan, An Introduction to Combinatorial Analysis, John Wiley & Sons, Inc. New York, 1958 (Chap 4, Problem 22).
LINKS
Alois P. Heinz, Table of n, a(n) for n = 0..491
Lev Glebsky, Melany Licón, Luis Manuel Rivera, On the number of even roots of permutations, arXiv:1907.00548 [math.CO], 2019.
FORMULA
E.g.f.: 1/2*exp(x + 1/2*x^2 + 1/5*x^5 + 1/10*x^10) + 1/2*exp(x - 1/2*x^2 + 1/5*x^5 - 1/10*x^10).
EXAMPLE
For n=4 the a(4)=4 solutions are (1), (1, 2)(3, 4), (1, 3)(2, 4), (1, 4)(2, 3) (permutations in cyclic notation). - Luis Manuel Rivera Martínez, Jun 18 2019
MATHEMATICA
With[{nn = 22}, CoefficientList[Series[1/2 Exp[x + x^2/2 + x^5/5 + x^10/10] + 1/2 Exp[x - x^2/2 + x^5/5 - x^10/10], {x, 0, nn}], x]* Range[0, nn]!] (* Luis Manuel Rivera Martínez, Jun 18 2019 *)
PROG
(PARI) my(x='x+O('x^25)); Vec(serlaplace(1/2*exp(x + 1/2*x^2 + 1/5*x^5 + 1/10*x^10) + 1/2*exp(x - 1/2*x^2 + 1/5*x^5 - 1/10*x^10))) \\ Michel Marcus, Jun 18 2019
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Vladeta Jovovic, Apr 14 2001
STATUS
approved