login
A174299
a(n) = floor(n!*exp(-n)).
1
1, 0, 0, 0, 0, 0, 1, 4, 13, 44, 164, 666, 2943, 14075, 72491, 400020, 2354549, 14725237, 97508021, 681552735, 5014584787, 38740015633, 313536416649, 2652902840111, 23422761943259, 215418814359446, 2060451979153567, 20465943911593383, 210812000258805578, 2249048624575857158, 24821362535291019333
OFFSET
0,8
MAPLE
A174299:=n->floor(n!*exp(-n)): seq(A174299(n), n=0..30); # Wesley Ivan Hurt, Aug 20 2015
MATHEMATICA
Table[Floor[n!*Exp[ -n]], {n, 0, 20}]
PROG
(PARI) first(m)=vector(m, i, i--; floor(i!/exp(i))) \\ Anders Hellström, Aug 20 2015
(Magma) [Floor(Factorial(n) / (Exp(n))): n in [0..40]]; // Vincenzo Librandi, Aug 21 2015
CROSSREFS
Sequence in context: A124463 A081197 A005490 * A351028 A285188 A192255
KEYWORD
nonn,easy
AUTHOR
Roger L. Bagula, Mar 15 2010
EXTENSIONS
Notation standardized by the Assoc. Eds. of the OEIS, Mar 31 2010
Added more terms and prepended terms a(0)..a(5), Joerg Arndt, Aug 13 2015
STATUS
approved