A062008 Number of divisors of (n!)!, or A000197.

1, 1, 2, 30, 242880, 23565900177211392000, 2773739201349556936377871973938118055565107020522751759201737480601600000000000000

Offset

0,3

Links

Harry J. Smith, Table of n, a(n) for n=0,...,7

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

Cf. A000197, A000203, A062569

Sequence in context: A090600 A113511 A292048 * A091776 A159578 A221192

Adjacent sequences: A062005 A062006 A062007 * A062009 A062010 A062011

Keyword

easy,nonn

Author

Jason Earls, Jul 04 2001

Status

approved