A132369 a(n) = PrimePi(n)!.
1, 1, 2, 2, 6, 6, 24, 24, 24, 24, 120, 120, 720, 720, 720, 720, 5040, 5040, 40320, 40320, 40320, 40320, 362880, 362880, 362880, 362880, 362880, 362880, 3628800, 3628800, 39916800, 39916800, 39916800, 39916800, 39916800, 39916800, 479001600
Offset: 1
Crossrefs
Cf. A000720.
Programs
-
Mathematica
Table[PrimePi[n]!,{n,37}] (* James C. McMahon, Mar 07 2025 *)
Extensions
Extended by Ray Chandler, Mar 02 2009