This site is supported by donations to The OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A129724 a(0) = 1; then a(n) = n!*(1-(-1)^n*Bernoulli(n-1)). 3
 1, 2, 3, 7, 24, 116, 720, 5160, 40320, 350784, 3628800, 42940800, 479001600, 4650877440, 87178291200, 2833294464000, 20922789888000, -2166903606067200, 6402373705728000, 6808619561103360000, 2432902008176640000, -26982365129174827008000, 1124000727777607680000 (list; graph; refs; listen; history; text; internal format)
 OFFSET 0,2 LINKS MAPLE f:=proc(n) if n=0 then RETURN(1); fi; if n mod 2 = 0 then RETURN(n!*(1-bernoulli(n-1))); else RETURN(n!*(1+bernoulli(n-1))); fi; end; MATHEMATICA a[0] = 1; a[n_] := n!*(1-(-1)^n*BernoulliB[n-1]); Table[a[n], {n, 0, 22}] (* Jean-François Alcover, Sep 16 2013 *) CROSSREFS Cf. A129825, A129826, A027641/A027642, A051716/A051717. Sequence in context: A102710 A048824 A099073 * A308161 A094697 A095910 Adjacent sequences:  A129721 A129722 A129723 * A129725 A129726 A129727 KEYWORD sign AUTHOR Paul Curtz, Jun 02 2007 EXTENSIONS Edited with simpler definition by N. J. A. Sloane, May 25 2008 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 June 25 22:35 EDT 2019. Contains 324364 sequences. (Running on oeis4.)