OFFSET
1,4
LINKS
Harry J. Smith, Table of n, a(n) for n = 1..100
EXAMPLE
a(7) = 630 because floor(7!/sigma(7)) = floor(5040/8) = floor(630) = 630.
MAPLE
with(numtheory): seq(floor(factorial(n)/sigma(n)), n=1..25); # Muniru A Asiru, Jun 29 2018
MATHEMATICA
Table[Floor[n!/DivisorSigma[1, n]], {n, 25}] (* Harvey P. Dale, Mar 23 2011 *)
PROG
(PARI) a(n)=n!\sigma(n);
(Magma) [Floor(Factorial(n)/DivisorSigma(1, n)): n in [1..25]]; // Vincenzo Librandi, Jun 29 2018
(GAP) List([1..25], n->Int(Factorial(n)/Sigma(n))); # Muniru A Asiru, Jun 29 2018
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Jason Earls, Jul 06 2001
STATUS
approved