A348568 Highly composite numbers (A002182) such that the exponents of 2 and 3 in their prime factorization are equal.
1, 6, 36, 180, 1260, 7560, 45360, 83160, 498960, 1081080, 6486480, 32432400, 110270160, 551350800, 2095133040, 10475665200, 73329656400, 240940299600, 1686582097200, 48910880818800, 1516237305382800
Offset: 1
Examples
1516237305382800 is highly composite and its prime factorization is 2^4 * 3^4 * 5^2 * 7^2 * 11 * 13 * 17 * 19 * 23 * 29 * 31. Since the exponents of 2 and 3 are both 4, 1516237305382800 is in this sequence.
Programs
-
Mathematica
HCN = Import["https://oeis.org/A002182/b002182.txt", "Table"][[;; , 2]]; Select[HCN, IntegerExponent[#, 2] == IntegerExponent[#, 3] &] (* Amiram Eldar, Oct 27 2021 *)
Comments