A325347 -id:A325347 - cp's OEIS frontend

A360553 Numbers > 1 whose unordered prime signature has integer median.

2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 13, 14, 15, 16, 17, 19, 21, 22, 23, 24, 25, 26, 27, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 46, 47, 49, 51, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 64, 65, 66, 67, 69, 70, 71, 73, 74, 77, 78, 79, 81, 82, 83

Offset: 1

Gus Wiseman, Feb 16 2023

nonn

First differs from A067340 in having 60.
A number's unordered prime signature (row n of A118914) is the multiset of positive exponents in its prime factorization.
The median of a multiset is either the middle part (for odd length), or the average of the two middle parts (for even length).

			The unordered prime signature of 60 is {1,1,2}, with median 1, so 60 is in the sequence.
The unordered prime signature of 1260 is {1,1,2,2}, with median 3/2, so 1260 is not in the sequence.

For mean instead of median we have A067340, complement A070011.
Positions of even terms in A360460.
The complement is A360554 (without 1).
These partitions are counted by A360687.
- For divisors (A063655) we have A139711, complement A139710.
- For prime indices (A360005) we have A359908, complement A359912.
- For distinct prime indices (A360457) we have A360550, complement A360551.
- For distinct prime factors (A360458) we have A360552, complement A100367.
- For prime factors (A360459) we have A359913, complement A072978.
- For prime multiplicities (A360460) we have A360553, complement A360554.
- For 0-prepended differences (A360555) we have A360556, complement A360557.
A112798 lists prime indices, length A001222, sum A056239.
A124010 lists prime signature.
A325347 = partitions w/ integer median, complement A307683, strict A359907.
A359893 and A359901 count partitions by median, odd-length A359902.
A360454 = numbers whose prime indices and signature have the same median.
Cf. A000975, A026424, A078174, A078175, A316413, A326621, A360453.

Select[Range[2,100],IntegerQ[Median[Last/@FactorInteger[#]]]&]

A360687 Number of integer partitions of n whose multiplicities have integer median.

Original entry on oeis.org

1, 2, 3, 4, 5, 9, 10, 16, 22, 34, 42, 65, 80, 115, 145, 195, 240, 324, 396, 519, 635, 814, 994, 1270, 1549, 1952, 2378, 2997, 3623, 4521, 5466, 6764, 8139, 10008, 12023, 14673, 17534, 21273, 25336, 30593, 36302, 43575, 51555, 61570, 72653, 86382, 101676

Offset: 1

Gus Wiseman, Feb 20 2023

nonn

The median of a multiset is either the middle part (for odd length), or the average of the two middle parts (for even length).

			The a(1) = 1 through a(8) = 16 partitions:
  (1)  (2)   (3)    (4)     (5)      (6)       (7)        (8)
       (11)  (21)   (22)    (32)     (33)      (43)       (44)
             (111)  (31)    (41)     (42)      (52)       (53)
                    (1111)  (2111)   (51)      (61)       (62)
                            (11111)  (222)     (421)      (71)
                                     (321)     (2221)     (431)
                                     (2211)    (3211)     (521)
                                     (3111)    (4111)     (2222)
                                     (111111)  (211111)   (3221)
                                               (1111111)  (3311)
                                                          (4211)
                                                          (5111)
                                                          (32111)
                                                          (221111)
                                                          (311111)
                                                          (11111111)
For example, the partition y = (3,2,2,1) has multiplicities (1,2,1), and the multiset {1,1,2} has median 1, so y is counted under a(8).

The case of an odd number of multiplicities is A090794.
For mean instead of median we have A360069, ranks A067340.
These partitions have ranks A360553.
The complement is counted by A360690, ranks A360554.
A058398 counts partitions by mean, see also A008284, A327482.
A124010 gives prime signature, sorted A118914, mean A088529/A088530.
A325347 = partitions w/ integer median, strict A359907, complement A307683.
A359893 and A359901 count partitions by median, odd-length A359902.
Cf. A000975, A329976, A359908, A360068, A360460, A360550, A360556, A360688.

Table[Length[Select[IntegerPartitions[n],IntegerQ[Median[Length/@Split[#]]]&]],{n,30}]

A360688 Number of integer partitions of n with integer median of 0-appended first differences.

Original entry on oeis.org

1, 1, 3, 4, 5, 7, 12, 18, 25, 32, 46, 62, 79, 109, 142, 189, 240, 322, 405, 522, 671, 853, 1053, 1345, 1653, 2081, 2551, 3174, 3878, 4826, 5851, 7219, 8747, 10712, 12936, 15719, 18876, 22872, 27365, 32926, 39253, 47070, 55857, 66676, 79029, 93864, 110832

Offset: 1

Gus Wiseman, Feb 20 2023

nonn

Includes all partitions of odd length (A027193).

The median of a multiset is either the middle part (for odd length), or the average of the two middle parts (for even length).

			The a(1) = 1 through a(8) = 18 partitions:
  (1)  (2)  (3)    (4)     (5)      (6)       (7)        (8)
            (21)   (22)    (41)     (42)      (43)       (44)
            (111)  (211)   (221)    (222)     (61)       (62)
                   (1111)  (311)    (321)     (322)      (332)
                           (11111)  (411)     (331)      (422)
                                    (21111)   (421)      (431)
                                    (111111)  (511)      (521)
                                              (3211)     (611)
                                              (22111)    (2222)
                                              (31111)    (3221)
                                              (211111)   (4211)
                                              (1111111)  (22211)
                                                         (32111)
                                                         (41111)
                                                         (221111)
                                                         (311111)
                                                         (2111111)
                                                         (11111111)
For example, the partition y = (3,2,2,1) has 0-appended parts (3,2,2,1,0), with differences (1,0,1,1), and the multiset {0,1,1,1} has median 1, so y is counted under a(8).

The case of median 0 is A360254, ranks A360558.
These partitions have ranks A360556, complement A360557.
A000041 counts integer partitions, strict A000009.
A008284 counts partitions by number of parts.
A325347 counts partitions w/ integer median, strict A359907, ranks A359908.
A359893 and A359901 count partitions by median, odd-length A359902.
Cf. A000975, A027193, A237363, A240219, A360455, A360555.

Table[Length[Select[IntegerPartitions[n],IntegerQ[Median[Differences[Prepend[Reverse[#],0]]]]&]],{n,30}]

A361801 Number of nonempty subsets of {1..n} with median n/2.

Original entry on oeis.org

0, 0, 1, 1, 4, 4, 14, 14, 49, 49, 175, 175, 637, 637, 2353, 2353, 8788, 8788, 33098, 33098, 125476, 125476, 478192, 478192, 1830270, 1830270, 7030570, 7030570, 27088870, 27088870, 104647630, 104647630, 405187825, 405187825, 1571990935, 1571990935

Offset: 0

Gus Wiseman, Apr 07 2023

The median of a multiset is either the middle part (for odd length), or the average of the two middle parts (for even length).

			The subset {1,2,3,5} of {1..5} has median 5/2, so is counted under a(5).
The subset {2,3,5} of {1..6} has median 6/2, so is counted under a(6).
The a(0) = 0 through a(7) = 14 subsets:
  .  .  {1}  {1,2}  {2}      {1,4}      {3}          {1,6}
                    {1,3}    {2,3}      {1,5}        {2,5}
                    {1,2,3}  {1,2,3,4}  {2,4}        {3,4}
                    {1,2,4}  {1,2,3,5}  {1,3,4}      {1,2,5,6}
                                        {1,3,5}      {1,2,5,7}
                                        {1,3,6}      {1,3,4,5}
                                        {2,3,4}      {1,3,4,6}
                                        {2,3,5}      {1,3,4,7}
                                        {2,3,6}      {2,3,4,5}
                                        {1,2,4,5}    {2,3,4,6}
                                        {1,2,4,6}    {2,3,4,7}
                                        {1,2,3,4,5}  {1,2,3,4,5,6}
                                        {1,2,3,4,6}  {1,2,3,4,5,7}
                                        {1,2,3,5,6}  {1,2,3,4,6,7}

A bisection is A079309.
The case with n's has bisection A057552.
The case without n's is A100066, bisection A006134.
A central diagonal of A231147.
A version for partitions is A361849.
For mean instead of median we have A362046.
A000975 counts subsets with integer median, for mean A327475.
A007318 counts subsets by length.
A013580 appears to count subsets by median, by mean A327481.
A360005(n)/2 represents the median statistic for partitions.
Cf. A024718, A325347, A359893, A361654, A361864, A361866, A361911.

Table[Length[Select[Subsets[Range[n]],Median[#]==n/2&]],{n,0,10}]

a(n) = A079309(floor(n/2)). - Alois P. Heinz, Apr 11 2023

A360249 Numbers for which the prime indices have the same median as the distinct prime indices.

Original entry on oeis.org

1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 13, 14, 15, 16, 17, 19, 21, 22, 23, 25, 26, 27, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 41, 42, 43, 46, 47, 49, 51, 53, 55, 57, 58, 59, 61, 62, 64, 65, 66, 67, 69, 70, 71, 73, 74, 77, 78, 79, 81, 82, 83, 85, 86, 87, 89, 90, 91, 93, 94, 95, 97, 100, 101, 102, 103, 105, 106, 107, 109, 110, 111, 113, 114, 115, 118, 119, 121, 122, 123, 125, 126, 127, 128, 129, 130

Offset: 1

Gus Wiseman, Feb 07 2023

nonn

First differs from A072774 in having 90.
First differs from A242414 in having 180.
A prime index of n is a number m such that prime(m) divides n. The multiset of prime indices of n is row n of A112798.
The median of a multiset is either the middle part (for odd length), or the average of the two middle parts (for even length).

			The prime indices of 126 are {1,2,2,4} with median 2 and distinct prime indices {1,2,4} with median 2, so 126 is in the sequence.
The prime indices of 180 are {1,1,2,2,3} with median 2 and distinct prime indices {1,2,3} with median 2, so 180 is in the sequence.

These partitions are counted by A360245.
The complement for mean instead of median is A360246, counted by A360242.
For mean instead of median we have A360247, counted by A360243.
The complement is A360248, counted by A360244.
For multiplicities instead of parts: A360453, counted by A360455.
For multiplicities instead of distinct parts: A360454, counted by A360456.
A112798 lists prime indices, length A001222, sum A056239.
A240219 counts partitions with mean equal to median, ranks A359889.
A326567/A326568 gives mean of prime indices.
A326619/A326620 gives mean of distinct prime indices.
A325347 = partitions with integer median, strict A359907, ranks A359908.
A359893 and A359901 count partitions by median.
A359894 = partitions with mean different from median, ranks A359890.
A360005 gives median of prime indices (times two).
Cf. A000975, A078174, A316413, A324570, A359903, A360252, A360253.

isA360249 := proc(n)
    local ifs,pidx,pe,medAll,medDist ;
    if n = 1 then
        return true ;
    end if ;
    ifs := ifactors(n)[2] ;
    pidx := [] ;
    for pe in ifs do
        numtheory[pi](op(1,pe)) ;
        pidx := [op(pidx),seq(%,i=1..op(2,pe))] ;
    end do:
    medAll := stats[describe,median](sort(pidx)) ;
    pidx := convert(convert(pidx,set),list) ;
    medDist := stats[describe,median](sort(pidx)) ;
    if medAll = medDist then
        true;
    else
        false;
    end if;
end proc:
for n from 1 to 130 do
    if isA360249(n) then
        printf("%d,",n) ;
    end if;
end do: # R. J. Mathar, May 22 2023

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

A360552 Numbers > 1 whose distinct prime factors have integer median.

Original entry on oeis.org

2, 3, 4, 5, 7, 8, 9, 11, 13, 15, 16, 17, 19, 21, 23, 25, 27, 29, 30, 31, 32, 33, 35, 37, 39, 41, 42, 43, 45, 47, 49, 51, 53, 55, 57, 59, 60, 61, 63, 64, 65, 66, 67, 69, 70, 71, 73, 75, 77, 78, 79, 81, 83, 84, 85, 87, 89, 90, 91, 93, 95, 97, 99, 101, 102, 103

Offset: 1

Gus Wiseman, Feb 16 2023

nonn

The median of a multiset is either the middle part (for odd length), or the average of the two middle parts (for even length).

			The prime factors of 900 are {2,2,3,3,5,5}, with distinct parts {2,3,5}, with median 3, so 900 is in the sequence.

For mean instead of median we have A078174, complement of A176587.
The complement is A100367 (without 1).
Positions of even terms in A360458.
- For divisors (A063655) we have A139711, complement A139710.
- For prime indices (A360005) we have A359908, complement A359912.
- For distinct prime indices (A360457) we have A360550, complement A360551.
- For distinct prime factors (A360458) we have A360552, complement A100367.
- For prime factors (A360459) we have A359913, complement A072978.
- For prime multiplicities (A360460) we have A360553, complement A360554.
- For 0-prepended differences (A360555) we have A360556, complement A360557.
A027746 lists prime factors, length A001222, indices A112798.
A027748 lists distinct prime factors, length A001221, indices A304038.
A323171/A323172 = mean of distinct prime factors, indices A326619/A326620.
A325347 = partitions w/ integer median, complement A307683, strict A359907.
A359893 and A359901 count partitions by median, odd-length A359902.
Cf. A000975, A026424, A056239, A078175, A175352, A316413, A326621, A360009.

Select[Range[2,100],IntegerQ[Median[First/@FactorInteger[#]]]&]

A359896 Number of odd-length integer partitions of n whose parts do not have the same mean as median.

Original entry on oeis.org

0, 0, 0, 0, 1, 2, 2, 6, 9, 11, 15, 27, 32, 50, 58, 72, 112, 149, 171, 246, 286, 359, 477, 630, 773, 941, 1181, 1418, 1749, 2289, 2668, 3429, 4162, 4878, 6074, 7091, 8590, 10834, 12891, 15180, 18491, 22314, 25845, 31657, 36394, 42269, 52547, 62414, 73576, 85701

Offset: 0

Gus Wiseman, Jan 20 2023

nonn

			The a(4) = 1 through a(9) = 11 partitions:
  (211)  (221)  (411)    (322)    (332)      (441)
         (311)  (21111)  (331)    (422)      (522)
                         (421)    (431)      (621)
                         (511)    (521)      (711)
                         (22111)  (611)      (22221)
                         (31111)  (22211)    (32211)
                                  (32111)    (33111)
                                  (41111)    (42111)
                                  (2111111)  (51111)
                                             (2211111)
                                             (3111111)

These partitions are ranked by A359892.
The any-length version is A359894, complement A240219, strict A359898.
The complement is counted by A359895, ranked by A359891.
The strict case is A359900, complement A359899.
A000041 counts partitions, strict A000009.
A008284/A058398/A327482 count partitions by mean, ranked by A326567/A326568.
A027193 counts odd-length partitions, strict A067659, ranked by A026424.
A067538 counts ptns with integer mean, strict A102627, ranked by A316413.
A237984 counts ptns containing their mean, strict A240850, ranked by A327473.
A325347 counts ptns with integer median, strict A359907, ranked by A359908.
A359893 and A359901 count partitions by median, odd-length A359902.
Cf. A008289, A066571, A316313, A327472, A327482, A359890, A359906, A359910.

Table[Length[Select[IntegerPartitions[n], OddQ[Length[#]]&&Mean[#]!=Median[#]&]],{n,0,30}]

A359898 Number of strict integer partitions of n whose parts do not have the same mean as median.

Original entry on oeis.org

0, 0, 0, 0, 0, 0, 0, 1, 2, 1, 4, 6, 5, 11, 12, 14, 21, 29, 26, 44, 44, 58, 68, 92, 92, 118, 137, 165, 192, 241, 223, 324, 353, 405, 467, 518, 594, 741, 809, 911, 987, 1239, 1276, 1588, 1741, 1823, 2226, 2566, 2727, 3138, 3413, 3905, 4450, 5093, 5434, 6134

Offset: 0

Gus Wiseman, Jan 20 2023

nonn

			The a(7) = 1 through a(13) = 11 partitions:
  (4,2,1)  (4,3,1)  (6,2,1)  (5,3,2)  (5,4,2)    (6,5,1)    (6,4,3)
           (5,2,1)           (5,4,1)  (6,3,2)    (7,3,2)    (6,5,2)
                             (6,3,1)  (6,4,1)    (8,3,1)    (7,4,2)
                             (7,2,1)  (7,3,1)    (9,2,1)    (7,5,1)
                                      (8,2,1)    (6,3,2,1)  (8,3,2)
                                      (5,3,2,1)             (8,4,1)
                                                            (9,3,1)
                                                            (10,2,1)
                                                            (5,4,3,1)
                                                            (6,4,2,1)
                                                            (7,3,2,1)

The non-strict version is ranked by A359890, complement A359889.
The non-strict version is A359894, complement A240219.
The complement is counted by A359897.
The odd-length case is A359900, complement A359899.
A000041 counts partitions, strict A000009.
A008284/A058398/A327482 count partitions by mean, ranked by A326567/A326568.
A008289 counts strict partitions by mean.
A067538 counts ptns with integer mean, strict A102627, ranked by A316413.
A237984 counts ptns containing their mean, strict A240850, ranked by A327473.
A325347 counts ptns with integer median, strict A359907, ranked by A359908.
A359893 and A359901 count partitions by median, odd-length A359902.
Cf. A000016, A065795, A066571, A082550, A135342, A240851, A327475, A327482, A328966, A359906.

Table[Length[Select[IntegerPartitions[n], UnsameQ@@#&&Mean[#]!=Median[#]&]],{n,0,30}]

A360454 Numbers for which the prime multiplicities (or sorted signature) have the same median as the prime indices.

Original entry on oeis.org

1, 2, 9, 54, 100, 120, 125, 135, 168, 180, 189, 240, 252, 264, 280, 297, 300, 312, 336, 351, 396, 408, 440, 450, 456, 459, 468, 480, 513, 520, 528, 540, 552, 560, 588, 612, 616, 621, 624, 672, 680, 684, 696, 728, 744, 756, 760, 783, 816, 828, 837, 880, 882

Offset: 1

Gus Wiseman, Feb 10 2023

nonn

A prime index of n is a number m such that prime(m) divides n. The multiset of prime indices of n is row n of A112798.

The median of a multiset is either the middle part (for odd length), or the average of the two middle parts (for even length).

			The terms together with their prime indices begin:
    1: {}
    2: {1}
    9: {2,2}
   54: {1,2,2,2}
  100: {1,1,3,3}
  120: {1,1,1,2,3}
  125: {3,3,3}
  135: {2,2,2,3}
  168: {1,1,1,2,4}
  180: {1,1,2,2,3}
  189: {2,2,2,4}
  240: {1,1,1,1,2,3}
For example, the prime indices of 336 are {1,1,1,1,2,4} with median 1 and multiplicities {1,1,4} with median 1, so 336 is in the sequence.

For mean instead of median we have A359903, counted by A360068.
For distinct indices instead of indices we have A360453, counted by A360455.
For distinct indices instead of multiplicities: A360249, counted by A360245.
These partitions are counted by A360456.
A088529/A088530 gives mean of prime signature A124010.
A112798 lists prime indices, length A001222, sum A056239.
A240219 counts partitions with mean equal to median, ranked by A359889.
A325347 counts partitions w/ integer median, strict A359907, ranks A359908.
A326567/A326568 gives mean of prime indices.
A326619/A326620 gives mean of distinct prime indices.
A359893 and A359901 count partitions by median.
A359894 counts partitions with mean different from median, ranks A359890.
A360005 gives median of prime indices (times two).
Cf. A000975, A109297, A109298, A114638, A316413, A324570, A360244, A360248.

prix[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
Select[Range[1000],Median[prix[#]]==Median[Length/@Split[prix[#]]]&]

A360686 Number of integer partitions of n whose distinct parts have integer median.

Original entry on oeis.org

1, 2, 2, 4, 3, 8, 7, 16, 17, 31, 35, 60, 67, 99, 121, 170, 200, 270, 328, 436, 522, 674, 828, 1061, 1292, 1626, 1983, 2507, 3035, 3772, 4582, 5661, 6801, 8358, 10059, 12231, 14627, 17702, 21069, 25423, 30147, 36100, 42725, 50936, 60081, 71388, 84007, 99408

Offset: 1

Gus Wiseman, Feb 20 2023

nonn

The median of a multiset is either the middle part (for odd length), or the average of the two middle parts (for even length).

			The a(1) = 1 through a(8) = 16 partitions:
  (1)  (2)   (3)    (4)     (5)      (6)       (7)        (8)
       (11)  (111)  (22)    (311)    (33)      (331)      (44)
                    (31)    (11111)  (42)      (421)      (53)
                    (1111)           (51)      (511)      (62)
                                     (222)     (3211)     (71)
                                     (321)     (31111)    (422)
                                     (3111)    (1111111)  (431)
                                     (111111)             (521)
                                                          (2222)
                                                          (3221)
                                                          (3311)
                                                          (4211)
                                                          (5111)
                                                          (32111)
                                                          (311111)
                                                          (11111111)
For example, the partition y = (7,4,2,1,1) has distinct parts {1,2,4,7} with median 3, so y is counted under a(15).

For all parts: A325347, strict A359907, ranks A359908, complement A307683.
For mean instead of median: A360241, ranks A326621.
These partitions have ranks A360550, complement A360551.
For multiplicities instead of distinct parts: A360687.
The complement is counted by A360689.
A000041 counts integer partitions, strict A000009.
A000975 counts subsets with integer median.
A027193 counts odd-length partitions, strict A067659, ranks A026424.
A067538 counts partitions with integer mean, strict A102627, ranks A316413.
A116608 counts partitions by number of distinct parts.
A359893 and A359901 count partitions by median, odd-length A359902.
Cf. A240219, A359906, A360005, A360071, A360244, A360245, A360556, A360688.

Table[Length[Select[IntegerPartitions[n], IntegerQ[Median[Union[#]]]&]],{n,30}]

cp's OEIS Frontend

A360553 Numbers > 1 whose unordered prime signature has integer median.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A360687 Number of integer partitions of n whose multiplicities have integer median.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A360688 Number of integer partitions of n with integer median of 0-appended first differences.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A361801 Number of nonempty subsets of {1..n} with median n/2.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

Formula

A360249 Numbers for which the prime indices have the same median as the distinct prime indices.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Maple

Mathematica

A360552 Numbers > 1 whose distinct prime factors have integer median.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A359896 Number of odd-length integer partitions of n whose parts do not have the same mean as median.

Views

Author

Keywords

Examples

Crossrefs

Programs

Mathematica

A359898 Number of strict integer partitions of n whose parts do not have the same mean as median.

Views

Author

Keywords

Examples

Crossrefs

Programs

Mathematica

A360454 Numbers for which the prime multiplicities (or sorted signature) have the same median as the prime indices.

Views

Author

Keywords

Comments

Examples

Crossrefs