A348092 Unique values, or record values, of A343743.
2, 4, 12, 24, 48, 144, 1440, 2880, 120960, 1451520, 87091200, 1902071808000, 15184923989114880000, 808017424794512875886459904961710757005754368000000000
Offset: 1
References
- J. H. Conway, R. T. Curtis, S. P. Norton, R. A. Parker and R. A. Wilson, ATLAS of Finite Groups. Oxford Univ. Press, 1985 [for best online version see https://oeis.org/wiki/Welcome#Links_to_Other_Sites].
- J. H. Conway, N. J. A. Sloane, Sphere Packings, Lattices, and Groups. Springer, 3rd ed., 1999.
Programs
-
Mathematica
f = FactorInteger[MonsterGroupM[] // GroupOrder]; DeleteDuplicates@ Table[Times @@ ((First[#]^Floor[Last[#]/z]) & /@ f), {z, Max[f[[;; , 2]]], 1, -1}] (* Amiram Eldar, Sep 30 2021 *)
Formula
a(n) = Product_{k=1..20} prime(k)^floor(A051161(k)/z(n)).
Comments