cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A048099 Number of degree-n even permutations of order exactly 2.

This page as a plain text file.
%I A048099 #30 Feb 01 2020 18:37:11
%S A048099 0,0,0,3,15,45,105,315,1323,5355,18315,63855,272415,1264263,5409495,
%T A048099 22302735,101343375,507711375,2495918223,11798364735,58074029055,
%U A048099 309240315615,1670570920095,8792390355903,46886941456575,264381946998975,1533013006902975,8785301059346175,50439885753378303
%N A048099 Number of degree-n even permutations of order exactly 2.
%H A048099 Andrew Howroyd, <a href="/A048099/b048099.txt">Table of n, a(n) for n = 1..200</a>
%H A048099 Koda, Tatsuhiko; Sato, Masaki; Takegahara, Yugen; <a href="http://dx.doi.org/10.1142/S0219498815500528">2-adic properties for the numbers of involutions in the alternating groups</a>, J. Algebra Appl. 14 (2015), no. 4, 1550052 (21 pages).
%F A048099 a(n) = (A001189(n) + A051684(n))/2.
%F A048099 a(n) = Sum_{i=1..floor(n/4)} binomial(n,4i)(4i)!/(2^(2i)(2i)!). - _Luis Manuel Rivera Martínez_, May 16 2018
%F A048099 E.g.f.: (exp(x + x^2/2) + exp(x - x^2/2))/2 - exp(x). - _Andrew Howroyd_, Feb 01 2020
%t A048099 Table[Sum[Binomial[n , 4 i] (4 i)!/(2^(2 i) (2 i)!), {i, 1, Floor[n/4]}], {n,1,22}] (* _Luis Manuel Rivera Martínez_, May 16 2018 *)
%o A048099 (PARI) a(n) = sum(i=1, n\4, binomial(n,4*i)*(4*i)!/(2^(2*i)*(2*i)!)); \\ _Michel Marcus_, May 17 2018
%o A048099 (PARI) seq(n)={my(A=O(x*x^n)); Vec(serlaplace(exp(x + x^2/2 + A) + exp(x - x^2/2 + A) - 2*exp(x + A))/2, -n)} \\ _Andrew Howroyd_, Feb 01 2020
%Y A048099 Cf. A001189, A051695. A column of A057740.
%K A048099 easy,nonn
%O A048099 1,4
%A A048099 _Vladeta Jovovic_