[go: up one dir, main page]

login
A066979
a(n) = floor(n!/2^n).
3
0, 0, 0, 1, 3, 11, 39, 157, 708, 3543, 19490, 116943, 760134, 5320940, 39907054, 319256437, 2713679718, 24423117468, 232019615953, 2320196159531, 24362059675078, 267982656425859, 3081800548897382, 36981606586768593
OFFSET
1,5
LINKS
MATHEMATICA
Table[Floor[n!/2^n], {n, 30}] (* Harvey P. Dale, Aug 21 2021 *)
PROG
(PARI) { for (n=1, 150, write("b066979.txt", n, " ", floor(n!/2^n)) ) } \\ Harry J. Smith, Apr 14 2010
CROSSREFS
Sequence in context: A245390 A149061 A149062 * A333548 A136775 A108153
KEYWORD
nonn
AUTHOR
Benoit Cloitre, Jan 26 2002
STATUS
approved