A055637 - OEIS

A055637

(n-1)!/n or 0 if n does not divide (n-1)!..

1, 0, 0, 0, 0, 20, 0, 630, 4480, 36288, 0, 3326400, 0, 444787200, 5811886080, 81729648000, 0, 19760412672000, 0, 6082255020441600, 115852476579840000, 2322315553259520000, 0, 1077167364120207360000, 24817936069329577574400

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,6

REFERENCES

Dave Wells, The Penguin Dictionary of Curious and Interesting Numbers (Revised Edition), Penguin Books, ISBN 0-14-02.6149-4, 1998, page 39.

LINKS

Table of n, a(n) for n=1..25.

MATHEMATICA

Do[If[Mod[(n-1)!/n]==0, Print[(n-1)!/n, Print[0]], {n, 1, 30}]

Table[If[Divisible[(n-1)!, n], (n-1)!/n, 0], {n, 30}] (* Harvey P. Dale, May 04 2018 *)

CROSSREFS

Sequence in context: A084029 A343329 A008426 * A086684 A221335 A298672

Adjacent sequences: A055634 A055635 A055636 * A055638 A055639 A055640

KEYWORD

nonn

AUTHOR

Robert G. Wilson v, Jun 07 2000

STATUS

approved