login
A062008
Number of divisors of (n!)!, or A000197.
1
1, 1, 2, 30, 242880, 23565900177211392000, 2773739201349556936377871973938118055565107020522751759201737480601600000000000000
OFFSET
0,3
LINKS
MAPLE
with(numtheory): A062008:=n->tau((n!)!): seq(A062008(n), n=0..6); # Wesley Ivan Hurt, Nov 08 2014
MATHEMATICA
Table[DivisorSigma[0, (n!)!], {n, 0, 6}] (* Wesley Ivan Hurt, Nov 08 2014 *)
PROG
(PARI) for(n=0, 6, print(numdiv(n!!)))
(PARI) { for (n=0, 7, write("b062008.txt", n, " ", numdiv(n!!)) ) } \\ [Harry J. Smith, Jul 29 2009]
(Magma) [NumberOfDivisors(Factorial(Factorial(n))): n in [0..7]]; // Vincenzo Librandi, Nov 09 2014
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Jason Earls, Jul 04 2001
STATUS
approved