login
A226198
a(n) = floor((n-1)!/n).
4
1, 0, 0, 1, 4, 20, 102, 630, 4480, 36288, 329890, 3326400, 36846276, 444787200, 5811886080, 81729648000, 1230752346352, 19760412672000, 336967037143578, 6082255020441600, 115852476579840000, 2322315553259520000, 48869596859895986086
OFFSET
1,5
COMMENTS
(h-1)!/h is integer if h belongs to A056653.
LINKS
MATHEMATICA
Table[Quotient[(n - 1)!, n], {n, 25}]
PROG
(Magma) [Floor(Factorial(n-1)/n): n in [1..25]];
CROSSREFS
Cf. A001048 ((n+1)!/n), A056653, A091330 (floor((p-1)!/p), where p is prime), A175787 (prime numbers together with 4).
Sequence in context: A093440 A168606 A229135 * A155485 A155181 A082761
KEYWORD
nonn
AUTHOR
Vincenzo Librandi, May 31 2013
EXTENSIONS
Edited by Bruno Berselli, May 31 2013
STATUS
approved