A360013 -id:A360013 - cp's OEIS frontend

A363952 Number of integer partitions of n with low mode k.

1, 0, 1, 0, 1, 1, 0, 2, 0, 1, 0, 3, 1, 0, 1, 0, 4, 2, 0, 0, 1, 0, 7, 2, 1, 0, 0, 1, 0, 9, 3, 2, 0, 0, 0, 1, 0, 13, 5, 2, 1, 0, 0, 0, 1, 0, 18, 6, 3, 2, 0, 0, 0, 0, 1, 0, 26, 9, 3, 2, 1, 0, 0, 0, 0, 1, 0, 32, 13, 5, 3, 2, 0, 0, 0, 0, 0, 1, 0, 47, 16, 7, 3, 2, 1, 0, 0, 0, 0, 0, 1

Offset: 0

Gus Wiseman, Jul 07 2023

A mode in a multiset is an element that appears at least as many times as each of the others. For example, the modes in {a,a,b,b,b,c,d,d,d} are {b,d}.

Extending the terminology of A124943, the "low mode" of a multiset is the least mode.

			Triangle begins:
   1
   0   1
   0   1   1
   0   2   0   1
   0   3   1   0   1
   0   4   2   0   0   1
   0   7   2   1   0   0   1
   0   9   3   2   0   0   0   1
   0  13   5   2   1   0   0   0   1
   0  18   6   3   2   0   0   0   0   1
   0  26   9   3   2   1   0   0   0   0   1
   0  32  13   5   3   2   0   0   0   0   0   1
   0  47  16   7   3   2   1   0   0   0   0   0   1
   0  60  21  10   4   3   2   0   0   0   0   0   0   1
   0  79  30  13   6   3   2   1   0   0   0   0   0   0   1
   0 104  38  17   7   4   3   2   0   0   0   0   0   0   0   1
Row n = 8 counts the following partitions:
  .  (71)        (62)     (53)   (44)  .  .  .  (8)
     (611)       (422)    (332)
     (521)       (3221)
     (5111)      (2222)
     (431)       (22211)
     (4211)
     (41111)
     (3311)
     (32111)
     (311111)
     (221111)
     (2111111)
     (11111111)

Row sums are A000041.
For median: A124943 (high A124944), rank statistic A363941 (high A363942).
Column k = 1 is A241131 (partitions w/ low mode 1), ranks A360015, A360013.
The rank statistic for this triangle is A363486.
For mean: A363945 (high A363946), rank statistic A363943 (high A363944).
The high version is A363953.
A008284 counts partitions by length, A058398 by mean.
A362612 counts partitions (max part) = (unique mode), ranks A362616.
A362614 counts partitions by number of modes, rank statistic A362611.
A362615 counts partitions by number of co-modes, rank statistic A362613.
Cf. A362610, A362608, A362607, A362609; A359178, A356862, A362605, A362606.
Cf. A002865, A025065, A026905, A067538, A237984, A363723, A363724, A363731.

modes[ms_]:=Select[Union[ms],Count[ms,#]>=Max@@Length/@Split[ms]&];
Table[Length[Select[IntegerPartitions[n], If[Length[#]==0,0,First[modes[#]]]==k&]],{n,0,15},{k,0,n}]

A363953 Number of integer partitions of n with high mode k.

Original entry on oeis.org

1, 0, 1, 0, 1, 1, 0, 1, 1, 1, 0, 2, 1, 1, 1, 0, 3, 1, 1, 1, 1, 0, 4, 2, 2, 1, 1, 1, 0, 7, 2, 1, 2, 1, 1, 1, 0, 9, 4, 2, 2, 2, 1, 1, 1, 0, 13, 6, 2, 2, 2, 2, 1, 1, 1, 0, 18, 7, 4, 3, 3, 2, 2, 1, 1, 1, 0, 26, 10, 5, 2, 3, 3, 2, 2, 1, 1, 1

Offset: 0

Gus Wiseman, Jul 07 2023

nonn

A mode in a multiset is an element that appears at least as many times as each of the others. For example, the modes in {a,a,b,b,b,c,d,d,d} are {b,d}.

Extending the terminology of A124944, the "high mode" in a multiset is the greatest mode.

			Triangle begins:
  1
  0  1
  0  1  1
  0  1  1  1
  0  2  1  1  1
  0  3  1  1  1  1
  0  4  2  2  1  1  1
  0  7  2  1  2  1  1  1
  0  9  4  2  2  2  1  1  1
  0 13  6  2  2  2  2  1  1  1
  0 18  7  4  3  3  2  2  1  1  1
  0 26 10  5  2  3  3  2  2  1  1  1
  0 32 15  8  4  4  4  3  2  2  1  1  1
  0 47 19  9  5  3  4  4  3  2  2  1  1  1
  0 60 26 13  7  5  5  5  4  3  2  2  1  1  1
  0 79 34 18 10  6  5  5  5  4  3  2  2  1  1  1
Row n = 9 counts the following partitions:
  .  (711)        (522)     (333)   (441)  (54)   (63)   (72)  (81)  (9)
     (6111)       (4221)    (3321)  (432)  (531)  (621)
     (5211)       (3222)
     (51111)      (32211)
     (4311)       (22221)
     (42111)      (222111)
     (411111)
     (33111)
     (321111)
     (3111111)
     (2211111)
     (21111111)
     (111111111)

Row sums are A000041.
For median: A124944 (low A124943), rank statistic A363942 (low A363941).
Column k = 1 is A241131 (partitions w/ high mode 1), ranks A360013, A360015.
The rank statistic for this triangle is A363487, low A363486.
For mean: A363946 (low A363945), rank statistic A363944 (low A363943).
The low version is A363952.
A008284 counts partitions by length, A058398 by mean.
A362612 counts partitions (max part) = (unique mode), ranks A362616.
A362614 counts partitions by number of modes, rank statistic A362611.
A362615 counts partitions by number of co-modes, rank statistic A362613.
Cf. A362610, A362608, A362607, A362609; A359178, A356862, A362605, A362606.
Cf. A002865, A025065, A026905, A237984, A363723, A363724, A363731.

modes[ms_]:=Select[Union[ms],Count[ms,#]>=Max@@Length/@Split[ms]&];
Table[Length[Select[IntegerPartitions[n], If[Length[#]==0,0,Last[modes[#]]]==k&]],{n,0,15},{k,0,n}]

A364062 Number of integer partitions of n with unique co-mode 1.

Original entry on oeis.org

0, 1, 1, 1, 1, 2, 1, 3, 2, 3, 3, 6, 2, 8, 6, 9, 6, 16, 7, 21, 12, 23, 18, 39, 17, 47, 32, 59, 40, 86, 44, 110, 72, 131, 95, 188, 103, 233, 166, 288, 201, 389, 244, 490, 347, 587, 440, 794, 524, 974, 727, 1187, 903, 1547, 1106, 1908, 1459, 2303, 1826, 2979, 2198

Offset: 0

Gus Wiseman, Jul 12 2023

nonn

These are partitions with at least one 1 but with fewer 1's than each of the other parts.

We define a co-mode in a multiset to be an element that appears at most as many times as each of the other elements. For example, the co-modes of {a,a,b,b,b,c,c} are {a,c}.

			The a(n) partitions for n = 5, 7, 11, 13, 15:
  (221)    (331)      (551)          (661)            (771)
  (11111)  (2221)     (33221)        (4441)           (44331)
           (1111111)  (33311)        (33331)          (55221)
                      (222221)       (44221)          (442221)
                      (2222111)      (332221)         (3322221)
                      (11111111111)  (2222221)        (3333111)
                                     (22222111)       (22222221)
                                     (1111111111111)  (222222111)
                                                      (111111111111111)

For high (or unique) mode we have A241131, ranks A360013.
For low mode we have A241131, ranks A360015.
Allowing any unique co-mode gives A362610, ranks A359178.
These partitions have ranks A364061.
Adding all 1-free partitions gives A364159, ranks A364158.
A000041 counts integer partitions, strict A000009.
A008284 counts partitions by length (or decreasing mean), strict A008289.
A237984 counts partitions containing their mean, ranks A327473.
A327472 counts partitions not containing their mean, ranks A327476.
A362608 counts partitions w/ unique mode, ranks A356862, complement A362605.
A362611 counts modes in prime indices, triangle A362614.
A362613 counts co-modes in prime indices, triangle A362615.
A363486 gives least mode in prime indices, A363487 greatest.
Cf. A002865, A027336, A325347, A098859, A360014, A362562, A362606, A363720, A363723, A363725, A363726.

comodes[ms_]:=Select[Union[ms],Count[ms,#]<=Min@@Length/@Split[ms]&];
Table[Length[Select[IntegerPartitions[n],comodes[#]=={1}&]],{n,0,30}]

A381439 Numbers whose exponent of 2 in their canonical prime factorization is not larger than all the other exponents.

Original entry on oeis.org

3, 5, 6, 7, 9, 10, 11, 13, 14, 15, 17, 18, 19, 21, 22, 23, 25, 26, 27, 29, 30, 31, 33, 34, 35, 36, 37, 38, 39, 41, 42, 43, 45, 46, 47, 49, 50, 51, 53, 54, 55, 57, 58, 59, 61, 62, 63, 65, 66, 67, 69, 70, 71, 73, 74, 75, 77, 78, 79, 81, 82, 83, 85, 86, 87, 89

Offset: 1

Gus Wiseman, Mar 02 2025

nonn

First differs from A335740 in lacking 72, which has prime indices {1,1,1,2,2} and section-sum partition (3,3,1).
Also numbers whose section-sum partition of prime indices (A381436) ends with a number > 1.
Includes all squarefree numbers (A005117) except 2.

			The terms together with their prime indices begin:
     3: {2}        25: {3,3}        45: {2,2,3}
     5: {3}        26: {1,6}        46: {1,9}
     6: {1,2}      27: {2,2,2}      47: {15}
     7: {4}        29: {10}         49: {4,4}
     9: {2,2}      30: {1,2,3}      50: {1,3,3}
    10: {1,3}      31: {11}         51: {2,7}
    11: {5}        33: {2,5}        53: {16}
    13: {6}        34: {1,7}        54: {1,2,2,2}
    14: {1,4}      35: {3,4}        55: {3,5}
    15: {2,3}      36: {1,1,2,2}    57: {2,8}
    17: {7}        37: {12}         58: {1,10}
    18: {1,2,2}    38: {1,8}        59: {17}
    19: {8}        39: {2,6}        61: {18}
    21: {2,4}      41: {13}         62: {1,11}
    22: {1,5}      42: {1,2,4}      63: {2,2,4}
    23: {9}        43: {14}         65: {3,6}

The LHS (exponent of 2) is A007814.
The complement is A360013 = 2*A360015 (if we prepend 1), counted by A241131 (shifted right and starting with 1 instead of 0).
The case of equality is A360014, inclusive A360015.
The RHS (greatest exponent of an odd prime factor) is A375669.
These are positions of terms > 1 in A381437.
Partitions of this type are counted by A381544.
A000040 lists the primes, differences A001223.
A051903 gives greatest prime exponent, least A051904.
A055396 gives least prime index, greatest A061395.
A056239 adds up prime indices, row sums of A112798.
A122111 represents conjugation in terms of Heinz numbers.
A239455 counts Look-and-Say partitions, complement A351293.
A381436 gives section-sum partition of prime indices, Heinz number A381431.
A381438 counts partitions by last part part of section-sum partition.
Cf. A000720, A001221, A001222, A001694, A003557, A005117, A066328, A130091, A181819, A212166, A380955.

Select[Range[100],FactorInteger[2*#][[1,2]]-1<=Max@@Last/@Rest[FactorInteger[2*#]]&]

Positive integers n such that A007814(n) <= A375669(n).

A381544 Number of integer partitions of n not containing more ones than any other part.

Original entry on oeis.org

0, 0, 1, 2, 3, 4, 7, 8, 13, 17, 24, 30, 45, 54, 75, 97, 127, 160, 212, 263, 342, 427, 541, 672, 851, 1046, 1307, 1607, 1989, 2428, 2993, 3631, 4443, 5378, 6533, 7873, 9527, 11424, 13752, 16447, 19701, 23470, 28016, 33253, 39537, 46801, 55428, 65408, 77238

Offset: 0

Gus Wiseman, Mar 24 2025

nonn

			The a(2) = 1 through a(9) = 17 partitions:
  (2)  (3)   (4)   (5)    (6)     (7)     (8)      (9)
       (21)  (22)  (32)   (33)    (43)    (44)     (54)
             (31)  (41)   (42)    (52)    (53)     (63)
                   (221)  (51)    (61)    (62)     (72)
                          (222)   (322)   (71)     (81)
                          (321)   (331)   (332)    (333)
                          (2211)  (421)   (422)    (432)
                                  (2221)  (431)    (441)
                                          (521)    (522)
                                          (2222)   (531)
                                          (3221)   (621)
                                          (3311)   (3222)
                                          (22211)  (3321)
                                                   (4221)
                                                   (22221)
                                                   (32211)
                                                   (222111)

The complement is counted by A241131, ranks A360013 = 2*A360015 (if we prepend 1).
The Heinz numbers of these partitions are A381439.
The case of equality is A382303, ranks A360014.
A000041 counts integer partitions, strict A000009.
A008284 counts partitions by length, strict A008289.
A047993 counts partitions with max part = length, ranks A106529.
A091602 counts partitions by the greatest multiplicity, rank statistic A051903.
A116598 counts ones in partitions, rank statistic A007814.
A239964 counts partitions with max multiplicity = length, ranks A212166.
A240312 counts partitions with max part = max multiplicity, ranks A381542.
A382302 counts partitions with max = max multiplicity = distinct length, ranks A381543.
Cf. A047966, A091605, A116861, A232697, A237984, A362608, A363724, A381079, A381437, A381438.

Table[Length[Select[IntegerPartitions[n],Count[#,1]<=Max@@Length/@Split[DeleteCases[#,1]]&]],{n,0,30}]

A364056 Numbers whose prime factors have high median 2. Numbers whose prime factors (with multiplicity) are mostly 2's.

Original entry on oeis.org

2, 4, 8, 12, 16, 20, 24, 28, 32, 40, 44, 48, 52, 56, 64, 68, 72, 76, 80, 88, 92, 96, 104, 112, 116, 120, 124, 128, 136, 144, 148, 152, 160, 164, 168, 172, 176, 184, 188, 192, 200, 208, 212, 224, 232, 236, 240, 244, 248, 256, 264, 268, 272, 280, 284, 288, 292

Offset: 1

Gus Wiseman, Jul 07 2023

nonn

The multiset of prime factors of n is row n of A027746.

The high median (see A124944) in a multiset is either the middle part (for odd length), or the greatest of the two middle parts (for even length).

			The terms together with their prime indices begin:
     2: {1}             64: {1,1,1,1,1,1}      136: {1,1,1,7}
     4: {1,1}           68: {1,1,7}            144: {1,1,1,1,2,2}
     8: {1,1,1}         72: {1,1,1,2,2}        148: {1,1,12}
    12: {1,1,2}         76: {1,1,8}            152: {1,1,1,8}
    16: {1,1,1,1}       80: {1,1,1,1,3}        160: {1,1,1,1,1,3}
    20: {1,1,3}         88: {1,1,1,5}          164: {1,1,13}
    24: {1,1,1,2}       92: {1,1,9}            168: {1,1,1,2,4}
    28: {1,1,4}         96: {1,1,1,1,1,2}      172: {1,1,14}
    32: {1,1,1,1,1}    104: {1,1,1,6}          176: {1,1,1,1,5}
    40: {1,1,1,3}      112: {1,1,1,1,4}        184: {1,1,1,9}
    44: {1,1,5}        116: {1,1,10}           188: {1,1,15}
    48: {1,1,1,1,2}    120: {1,1,1,2,3}        192: {1,1,1,1,1,1,2}
    52: {1,1,6}        124: {1,1,11}           200: {1,1,1,3,3}
    56: {1,1,1,4}      128: {1,1,1,1,1,1,1}    208: {1,1,1,1,6}

Partitions of this type are counted by A027336.
Median of prime indices is A360005(n)/2.
For mode instead of median we have A360013, low A360015.
The low version is A363488, positions of 1's in A363941.
Positions of 1's in A363942.
A112798 lists prime indices, length A001222, sum A056239.
A123528/A123529 gives mean of prime factors, indices A326567/A326568.
A124943 counts partitions by low median, high A124944.
Cf. A072978, A215366, A316413, A359908, A363727, A363740, A363949.

prifacs[n_]:=If[n==1,{},Flatten[ConstantArray@@@FactorInteger[n]]];
merr[y_]:=If[Length[y]==0,0,If[OddQ[Length[y]],y[[(Length[y]+1)/2]], y[[1+Length[y]/2]]]];
Select[Range[100],merr[prifacs[#]]==2&]

A363954 Numbers whose prime indices have low mean 2.

Original entry on oeis.org

3, 9, 10, 14, 15, 27, 28, 30, 42, 44, 45, 50, 52, 63, 66, 70, 75, 81, 84, 88, 90, 100, 104, 126, 132, 135, 136, 140, 150, 152, 156, 189, 196, 198, 204, 208, 210, 220, 225, 234, 243, 250, 252, 260, 264, 270, 272, 280, 294, 297, 300, 304, 308, 312, 315, 330, 350

Offset: 1

Gus Wiseman, Jul 05 2023

nonn

Extending the terminology of A124944, the "low mean" of a multiset is obtained by taking the mean and rounding down.

			The terms together with their prime indices begin:
     3: {2}
     9: {2,2}
    10: {1,3}
    14: {1,4}
    15: {2,3}
    27: {2,2,2}
    28: {1,1,4}
    30: {1,2,3}
    42: {1,2,4}
    44: {1,1,5}
    45: {2,2,3}
    50: {1,3,3}
    52: {1,1,6}
    63: {2,2,4}
    66: {1,2,5}
    70: {1,3,4}
    75: {2,3,3}
    81: {2,2,2,2}
    84: {1,1,2,4}
    88: {1,1,1,5}
    90: {1,2,2,3}
   100: {1,1,3,3}

Partitions of this type are counted by A363745.
Positions of 2's in A363943 (high A363944), triangle A363945 (high A363946).
For mean 1 we have A363949.
The high version is A363950, counted by A026905.
A112798 lists prime indices, length A001222, sum A056239.
A316413 ranks partitions with integer mean, counted by A067538.
A326567/A326568 gives mean of prime indices.
A363941 gives low median of prime indices, triangle A124943.
A363942 gives high median of prime indices, triangle A124944.
A363948 lists numbers whose prime indices have mean 1, counted by A363947.
Cf. A327473, A327476, A359889, A360013, A360015, A363488, A363951.

prix[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
Select[Range[100],Floor[Mean[prix[#]]]==2&]

A364160 Numbers whose least prime factor has the greatest exponent.

Original entry on oeis.org

1, 2, 3, 4, 5, 7, 8, 9, 11, 12, 13, 16, 17, 19, 20, 23, 24, 25, 27, 28, 29, 31, 32, 37, 40, 41, 43, 44, 45, 47, 48, 49, 52, 53, 56, 59, 60, 61, 63, 64, 67, 68, 71, 72, 73, 76, 79, 80, 81, 83, 84, 88, 89, 92, 96, 97, 99, 101, 103, 104, 107, 109, 112, 113, 116

Offset: 1

Gus Wiseman, Jul 14 2023

nonn

First differs from A334298 in having 600 and lacking 180.
Also numbers whose minimum part in prime factorization is a unique mode.
If k is a term, then so are all powers of k. - Robert Israel, Sep 17 2024

			The prime factorization of 600 is 2*2*2*3*5*5, and 3 > max(1,2), so 600 is in the sequence.
The prime factorization of 180 is 2*2*3*3*5, but 2 <= max(2,1), so 180 is not in the sequence.
The terms together with their prime indices begin:
     1: {}           29: {10}              67: {19}
     2: {1}          31: {11}              68: {1,1,7}
     3: {2}          32: {1,1,1,1,1}       71: {20}
     4: {1,1}        37: {12}              72: {1,1,1,2,2}
     5: {3}          40: {1,1,1,3}         73: {21}
     7: {4}          41: {13}              76: {1,1,8}
     8: {1,1,1}      43: {14}              79: {22}
     9: {2,2}        44: {1,1,5}           80: {1,1,1,1,3}
    11: {5}          45: {2,2,3}           81: {2,2,2,2}
    12: {1,1,2}      47: {15}              83: {23}
    13: {6}          48: {1,1,1,1,2}       84: {1,1,2,4}
    16: {1,1,1,1}    49: {4,4}             88: {1,1,1,5}
    17: {7}          52: {1,1,6}           89: {24}
    19: {8}          53: {16}              92: {1,1,9}
    20: {1,1,3}      56: {1,1,1,4}         96: {1,1,1,1,1,2}
    23: {9}          59: {17}              97: {25}
    24: {1,1,1,2}    60: {1,1,2,3}         99: {2,2,5}
    25: {3,3}        61: {18}             101: {26}
    27: {2,2,2}      63: {2,2,4}          103: {27}
    28: {1,1,4}      64: {1,1,1,1,1,1}    104: {1,1,1,6}

Robert Israel, Table of n, a(n) for n = 1..10000

Allowing any unique mode gives A356862, complement A362605.
Allowing any unique co-mode gives A359178, complement A362606.
The even case is A360013, counted by A241131.
For greatest instead of least we have A362616, counted by A362612.
These partitions are counted by A364193.
A027746 lists prime factors (with multiplicity).
A112798 lists prime indices, length A001222, sum A056239.
A362611 counts modes in prime factorization, triangle A362614.
A362613 counts co-modes in prime factorization, triangle A362615.
A363486 gives least mode in prime indices, A363487 greatest.
Cf. A098859, A327473, A327476, A360014, A360015, A362610, A364061, A364062.

filter:= proc(n) local F,i;
  F:= ifactors(n)[2];
  if nops(F) = 1 then return true fi;
  i:= min[index](F[..,1]);
  andmap(t -> F[t,2] < F[i,2], {$1..nops(F)} minus {i})
end proc:
filter(1):= true:
select(filter, [$1..200]); # Robert Israel, Sep 17 2024

Select[Range[100],First[Last/@FactorInteger[#]] > Max@@Rest[Last/@FactorInteger[#]]&]

A382303 Number of integer partitions of n with exactly as many ones as the next greatest multiplicity.

Original entry on oeis.org

0, 0, 0, 1, 1, 1, 3, 2, 4, 5, 8, 6, 15, 13, 19, 25, 33, 36, 54, 58, 80, 96, 122, 141, 188, 217, 274, 326, 408, 474, 600, 695, 859, 1012, 1233, 1440, 1763, 2050, 2475, 2899, 3476, 4045, 4850, 5630, 6695, 7797, 9216, 10689, 12628, 14611, 17162, 19875, 23253

Offset: 0

Gus Wiseman, Mar 24 2025

nonn

			The a(3) = 1 through a(10) = 8 partitions:
  (21)  (31)  (41)  (51)    (61)   (71)    (81)      (91)
                    (321)   (421)  (431)   (531)     (541)
                    (2211)         (521)   (621)     (631)
                                   (3311)  (32211)   (721)
                                           (222111)  (4321)
                                                     (4411)
                                                     (33211)
                                                     (42211)

First differences of A241131, ranks A360013 = 2*A360015 (if we prepend 1).
The Heinz numbers of these partitions are A360014.
Equal case of A381544 (ranks A381439).
A000041 counts integer partitions, strict A000009.
A008284 counts partitions by length, strict A008289.
A047993 counts partitions with max = length, ranks A106529.
A091602 counts partitions by the greatest multiplicity, rank statistic A051903.
A116598 counts ones in partitions, rank statistic A007814.
A239964 counts partitions with max multiplicity = length, ranks A212166.
A240312 counts partitions with max = max multiplicity, ranks A381542.
A382302 counts partitions with max = max multiplicity = distinct length, ranks A381543.
Cf. A047966, A051904, A091605, A116861, A237984, A239455, A362608, A363724, A381079, A381437, A381438.

Table[Length[Select[IntegerPartitions[n],Count[#,1]==Max@@Length/@Split[DeleteCases[#,1]]&]],{n,0,30}]

A364157 Numbers whose rounded-down (floor) mean of prime factors (with multiplicity) is 2.

Original entry on oeis.org

2, 4, 6, 8, 12, 16, 18, 24, 32, 36, 40, 48, 54, 64, 72, 80, 96, 108, 120, 128, 144, 160, 162, 192, 216, 224, 240, 256, 288, 320, 324, 360, 384, 432, 448, 480, 486, 512, 576, 640, 648, 672, 720, 768, 800, 864, 896, 960, 972, 1024, 1080, 1152, 1280, 1296, 1344

Offset: 1

Gus Wiseman, Jul 18 2023

nonn

			The terms together with their prime factors begin:
   2 = 2
   4 = 2*2
   6 = 2*3
   8 = 2*2*2
  12 = 2*2*3
  16 = 2*2*2*2
  18 = 2*3*3
  24 = 2*2*2*3
  32 = 2*2*2*2*2
  36 = 2*2*3*3
  40 = 2*2*2*5
  48 = 2*2*2*2*3
  54 = 2*3*3*3
  64 = 2*2*2*2*2*2
  72 = 2*2*2*3*3
  80 = 2*2*2*2*5
  96 = 2*2*2*2*2*3

Without multiplicity we appear to have A007694.
Prime factors are listed by A027746, indices A112798.
Positions of 2's in A126594, positions of first appearances A364037.
For prime indices and ceiling we have A363950, counted by A026905.
For prime indices we have A363954 (or A363949), counted by A363745.
A078175 lists numbers with integer mean of prime factors.
A123528/A123529 gives mean of prime factors, indices A326567/A326568.
A316413 ranks partitions with integer mean, counted by A067538.
A363895 gives floor of mean of distinct prime factors.
A363943 gives floor of mean of prime indices, ceiling A363944.
Cf. A001222, A056239, A327473, A327476, A360013, A360015, A363488, A363945.

prifacs[n_]:=If[n==1,{},Flatten[ConstantArray@@@FactorInteger[n]]];
Select[Range[100],Floor[Mean[prifacs[#]]]==2&]

cp's OEIS Frontend

A363952 Number of integer partitions of n with low mode k.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A363953 Number of integer partitions of n with high mode k.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A364062 Number of integer partitions of n with unique co-mode 1.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A381439 Numbers whose exponent of 2 in their canonical prime factorization is not larger than all the other exponents.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

Formula

A381544 Number of integer partitions of n not containing more ones than any other part.

Views

Author

Keywords

Examples

Crossrefs

Programs

Mathematica

A364056 Numbers whose prime factors have high median 2. Numbers whose prime factors (with multiplicity) are mostly 2's.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A363954 Numbers whose prime indices have low mean 2.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A364160 Numbers whose least prime factor has the greatest exponent.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Maple

Mathematica

A382303 Number of integer partitions of n with exactly as many ones as the next greatest multiplicity.

Views

Author

Keywords

Examples