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.

A071007 Number of permutations in the symmetric group S_n such that the maximal cycle has length exactly 3.

This page as a plain text file.
%I A071007 #9 Jun 14 2015 18:58:06
%S A071007 0,0,0,2,8,40,200,980,5152,28448,162080,979000,6179360,40575392,
%T A071007 279199648,1997406320,14825619200,114365751040,912510870272,
%U A071007 7521873125408,64045101880960,561615674345600,5067769601121920,47023128008540992,447820056115824128
%N A071007 Number of permutations in the symmetric group S_n such that the maximal cycle has length exactly 3.
%C A071007 E.g.f.: exp( x + (x^2)/2 + (x^3)/3 ) - exp( x + (x^2)/2 ).
%H A071007 Alois P. Heinz, <a href="/A071007/b071007.txt">Table of n, a(n) for n = 0..250</a>
%F A071007 a(n) = A057693(n) - A000085(n).
%t A071007 nn=20;Range[0,nn]!CoefficientList[Series[Exp[x+x^2/2+x^3/3]-Exp[x+x^2/2],{x,0,nn}],x]  (* _Geoffrey Critzer_, Jan 23 2013 *)
%o A071007 (PARI) for(n=0,25,print1(polcoeff(serlaplace(exp(x+x^2/2+x^3/3)-exp(x+x^2/2)),n)","))
%Y A071007 Cf. A057693, A000085, A027617.
%Y A071007 Column k=3 of A126074.
%K A071007 nonn
%O A071007 0,4
%A A071007 Sharon Sela (sharonsela(AT)hotmail.com), May 19 2002
%E A071007 More terms from _Ralf Stephan_, Apr 09 2003