This site is supported by donations to The OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A153760 Number of degree-n permutations of order exactly 7. 3
 0, 0, 0, 0, 0, 0, 720, 5760, 25920, 86400, 237600, 570240, 1235520, 892045440, 13348249200, 106757164800, 604924594560, 2722120577280, 10344007402560, 34479959558400, 24928970490633600, 546446134633639680, 6281586217487489040, 50248618811434961280 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,7 LINKS Alois P. Heinz, Table of n, a(n) for n = 1..200 FORMULA E.g.f.: -exp(x)+exp(x+1/7*x^7). - Alois P. Heinz, Feb 16 2013 MAPLE a:= proc(n) option remember;       `if`(n<7, 0, a(n-1)+(1+a(n-7))*(n-1)!/(n-7)!)     end: seq(a(n), n=1..30);  # Alois P. Heinz, Feb 16 2013 MATHEMATICA Rest[CoefficientList[Series[-Exp[x] + Exp[x + 1/7*x^7], {x, 0, 25}], x]*Range[0, 25]!] (* G. C. Greubel, Aug 27 2016 *) PROG (PARI) seq(n)={Vec(serlaplace(-exp(x + O(x*x^n)) + exp(x + x^7/7 + O(x*x^n))), -n)} \\ Andrew Howroyd, Jul 02 2018 CROSSREFS Column k=7 of A057731. - Alois P. Heinz, Feb 16 2013 Sequence in context: A052799 A229569 A179964 * A029574 A119540 A052784 Adjacent sequences:  A153757 A153758 A153759 * A153761 A153762 A153763 KEYWORD nonn AUTHOR Franz Vrabec, Jan 01 2009 EXTENSIONS More terms from Alois P. Heinz, Feb 16 2013 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified October 14 02:29 EDT 2019. Contains 327995 sequences. (Running on oeis4.)