login
A123367
a(n) = (n! - 2^n)/8, n >= 4.
1
1, 11, 82, 614, 5008, 45296, 453472, 4989344, 59874688, 778376576, 10897284352, 163459291904, 2615348727808, 44460928495616, 800296713183232, 15205637551038464, 304112751021948928, 6386367771463417856, 140500090972200435712, 3231502092360621031424
OFFSET
4,2
LINKS
MATHEMATICA
Table[(n!-2^n)/8, {n, 4, 30}] (* Harvey P. Dale, Aug 19 2012 *)
PROG
(PARI) for(n=4, 25, print1((n!-2^n)/8, ", ")) \\ G. C. Greubel, Oct 13 2017
(Magma) [(Factorial(n)-2^n)/8: n in [4..25]]; // G. C. Greubel, Oct 13 2017
CROSSREFS
Cf. A123642.
Sequence in context: A211845 A029887 A026871 * A177142 A129388 A030692
KEYWORD
nonn
AUTHOR
EXTENSIONS
Corrected and extended by Harvey P. Dale, Aug 19 2012
STATUS
approved