A013580 -id:A013580 - cp's OEIS frontend

A361857 Number of integer partitions of n such that the maximum is greater than twice the median.

0, 0, 0, 0, 1, 2, 3, 7, 11, 16, 25, 37, 52, 74, 101, 138, 185, 248, 325, 428, 554, 713, 914, 1167, 1476, 1865, 2336, 2922, 3633, 4508, 5562, 6854, 8405, 10284, 12536, 15253, 18489, 22376, 26994, 32507, 39038, 46802, 55963, 66817, 79582, 94643, 112315

Offset: 1

Gus Wiseman, Apr 02 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(5) = 1 through a(10) = 16 partitions:
  (311)  (411)   (511)    (521)     (522)      (622)
         (3111)  (4111)   (611)     (621)      (721)
                 (31111)  (4211)    (711)      (811)
                          (5111)    (5211)     (5221)
                          (32111)   (6111)     (5311)
                          (41111)   (33111)    (6211)
                          (311111)  (42111)    (7111)
                                    (51111)    (43111)
                                    (321111)   (52111)
                                    (411111)   (61111)
                                    (3111111)  (331111)
                                               (421111)
                                               (511111)
                                               (3211111)
                                               (4111111)
                                               (31111111)
The partition y = (5,2,2,1) has maximum 5 and median 2, and 5 > 2*2, so y is counted under a(10).

For length instead of median we have A237751.
For minimum instead of median we have A237820.
The complement is counted by A361848.
The equal version is A361849, ranks A361856.
Reversing the inequality gives A361858.
Allowing equality gives A361859, ranks A361868.
These partitions have ranks A361867.
For mean instead of median we have A361907.
A000041 counts integer partitions, strict A000009.
A000975 counts subsets with integer median.
A325347 counts partitions with integer median, complement A307683.
A359893 and A359901 count partitions by median.
A360005 gives twice median of prime indices, distinct A360457.
Cf. A008284, A013580, A027193, A061395, A237755, A237824, A240219, A361394, A361851, A361860.

Table[Length[Select[IntegerPartitions[n],Max@@#>2*Median[#]&]],{n,30}]

A361864 Number of set partitions of {1..n} whose block-medians have integer median.

Original entry on oeis.org

1, 0, 3, 6, 30, 96, 461, 2000, 10727, 57092, 342348

Offset: 1

Gus Wiseman, Apr 04 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 a(1) = 1 through a(4) = 6 set partitions:
  {{1}}  .  {{123}}      {{1}{234}}
            {{13}{2}}    {{123}{4}}
            {{1}{2}{3}}  {{1}{2}{34}}
                         {{12}{3}{4}}
                         {{1}{24}{3}}
                         {{13}{2}{4}}
The set partition {{1,2},{3},{4}} has block-medians {3/2,3,4}, with median 3, so is counted under a(4).

For mean instead of median we have A361865.
For sum instead of outer median we have A361911, means A361866.
A000110 counts set partitions.
A000975 counts subsets with integer median, mean A327475.
A013580 appears to count subsets by median, A327481 by mean.
A308037 counts set partitions with integer average block-size.
A325347 counts partitions w/ integer median, complement A307683.
A360005 gives twice median of prime indices, distinct A360457.
Cf. A007837, A035470, A038041, A275714, A275780, A326512, A326513.
Cf. A027193, A067659, A079309, A231147, A359893, A359907, A361801.

sps[{}]:={{}};sps[set:{i_,_}]:=Join@@Function[s,Prepend[#,s]& /@ sps[Complement[set,s]]]/@Cases[Subsets[set],{i,_}];
Table[Length[Select[sps[Range[n]],IntegerQ[Median[Median/@#]]&]],{n,6}]

A361866 Number of set partitions of {1..n} with block-means summing to an integer.

Original entry on oeis.org

1, 1, 1, 3, 8, 22, 75, 267, 1119, 4965, 22694, 117090, 670621, 3866503, 24113829, 161085223, 1120025702, 8121648620, 62083083115, 492273775141, 4074919882483

Offset: 0

Gus Wiseman, Apr 04 2023

			The a(1) = 1 through a(4) = 8 set partitions:
  {{1}}  {{1}{2}}  {{123}}      {{1}{234}}
                   {{13}{2}}    {{12}{34}}
                   {{1}{2}{3}}  {{123}{4}}
                                {{13}{24}}
                                {{14}{23}}
                                {{1}{24}{3}}
                                {{13}{2}{4}}
                                {{1}{2}{3}{4}}
The set partition y = {{1,2},{3,4}} has block-means {3/2,7/2}, with sum 5, so y is counted under a(4).

For mean instead of sum we have A361865, for median A361864.
For median instead of mean we have A361911.
A000110 counts set partitions.
A067538 counts partitions with integer mean, ranks A326836, strict A102627.
A308037 counts set partitions with integer mean block-size.
A327475 counts subsets with integer mean, median A000975.
A327481 counts subsets by mean, median A013580.
Cf. A007837, A035470, A038041, A275714, A275780, A326512, A326513.
Cf. A067659, A326515, A326516, A326521.

sps[{}]:={{}};sps[set:{i_,_}]:=Join@@Function[s,Prepend[#,s]&/@sps[Complement[set,s]]]/@Cases[Subsets[set],{i,_}];
Table[Length[Select[sps[Range[n]],IntegerQ[Total[Mean/@#]]&]],{n,6}]

a(14)-a(20) from Christian Sievers, May 12 2025

A212352 Row sums of A047997.

Original entry on oeis.org

0, 1, 3, 9, 25, 75, 235, 759, 2521, 8555, 29503, 103129, 364547, 1300819, 4679471, 16952161, 61790441, 226451035, 833918839, 3084255127, 11451630043, 42669225171, 159497648599, 597950875255, 2247724108771, 8470205600639

Offset: 0

N. J. A. Sloane, May 16 2012

nonn

Also the number of nonempty subsets of {1..2n} with mean n, even bisection of A362046. - Gus Wiseman, Apr 15 2023

			From _Gus Wiseman_, Apr 15 2023: (Start)
The a(1) = 1 through a(3) = 9 subsets:
  {1}  {2}      {3}
       {1,3}    {1,5}
       {1,2,3}  {2,4}
                {1,2,6}
                {1,3,5}
                {2,3,4}
                {1,2,3,6}
                {1,2,4,5}
                {1,2,3,4,5}
(End)

Equals A047653(n) - 1.
Row sums of A047997.
For median instead of mean we have A079309, bisection of A361801.
Even bisection of A362046, zero-based version A070925.
A000980 counts nonempty subsets of {1..2n-1} with mean n.
A007318 counts subsets by length.
A327475 counts subsets with integer mean.
A327481 counts subsets by mean.
Cf. A000975, A013580, A024718, A057552, A133406, A361866.

Table[Length[Select[Subsets[Range[2n]],Mean[#]==n&]],{n,0,6}] (* Gus Wiseman, Apr 15 2023 *)

From Gus Wiseman, Apr 15 2023: (Start)
a(n) = A000980(n)/2 - 1.
a(n) = A047653(n) - 1.
a(n) = A133406(2n+1) - 1.
a(n) = A362046(2n).
(End)

A361911 Number of set partitions of {1..n} with block-medians summing to an integer.

Original entry on oeis.org

1, 1, 3, 10, 30, 107, 479, 2249, 11173, 60144, 351086, 2171087, 14138253, 97097101, 701820663, 5303701310, 41838047938, 343716647215, 2935346815495, 25999729551523, 238473713427285, 2261375071834708, 22141326012712122, 223519686318676559, 2323959300370456901

Offset: 1

Gus Wiseman, Apr 14 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(4) = 10 set partitions:
  {{1}}  {{1}{2}}  {{123}}      {{1}{234}}
                   {{13}{2}}    {{12}{34}}
                   {{1}{2}{3}}  {{123}{4}}
                                {{124}{3}}
                                {{13}{24}}
                                {{134}{2}}
                                {{14}{23}}
                                {{1}{24}{3}}
                                {{13}{2}{4}}
                                {{1}{2}{3}{4}}
The set partition {{1,4},{2,3}} has medians {5/2,5/2}, with sum 5, so is counted under a(4).

For median instead of sum we have A361864.
For mean of means we have A361865.
For mean instead of median we have A361866.
A000110 counts set partitions.
A000975 counts subsets with integer median, mean A327475.
A013580 appears to count subsets by median, A327481 by mean.
A308037 counts set partitions with integer average block-size.
A325347 = partitions w/ integer median, complement A307683, strict A359907.
A360005 gives twice median of prime indices, distinct A360457.
Cf. A007837, A035470, A038041, A079309, A231147, A275714, A275780, A359893, A361801, A361910.

sps[{}]:={{}}; sps[set:{i_,_}] := Join@@Function[s,Prepend[#,s]& /@ sps[Complement[set,s]]] /@ Cases[Subsets[set],{i,_}];
Table[Length[Select[sps[Range[n]], IntegerQ[Total[Median/@#]]&]],{n,10}]

a(12)-a(25) from Christian Sievers, Aug 26 2024

A047997 Triangle of numbers a(n,k) = number of balance positions when k equal weights are placed at a k-subset of the points {-n, -(n-1), ..., n-1, n} on a centrally pivoted rod.

Original entry on oeis.org

1, 1, 2, 1, 3, 5, 1, 4, 8, 12, 1, 5, 13, 24, 32, 1, 6, 18, 43, 73, 94, 1, 7, 25, 69, 141, 227, 289, 1, 8, 32, 104, 252, 480, 734, 910, 1, 9, 41, 150, 414, 920, 1656, 2430, 2934, 1, 10, 50, 207, 649, 1636, 3370, 5744, 8150, 9686, 1, 11, 61, 277, 967

Offset: 1

N. J. A. Sloane

Also the number of k-subsets of {1..2n-1} with mean n. - Gus Wiseman, Apr 16 2023

			From _Gus Wiseman_, Apr 18 2023: (Start)
Triangle begins:
    1
    1    2
    1    3    5
    1    4    8   12
    1    5   13   24   32
    1    6   18   43   73   94
    1    7   25   69  141  227  289
    1    8   32  104  252  480  734  910
    1    9   41  150  414  920 1656 2430 2934
Row n = 4 counts the following balanced subsets:
  {0}  {-1,1}  {-1,0,1}   {-3,0,1,2}
       {-2,2}  {-2,0,2}   {-4,0,1,3}
       {-3,3}  {-3,0,3}   {-2,-1,0,3}
       {-4,4}  {-3,1,2}   {-2,-1,1,2}
               {-4,0,4}   {-3,-1,0,4}
               {-4,1,3}   {-3,-1,1,3}
               {-2,-1,3}  {-3,-2,1,4}
               {-3,-1,4}  {-3,-2,2,3}
                          {-4,-1,1,4}
                          {-4,-1,2,3}
                          {-4,-2,2,4}
                          {-4,-3,3,4}
(End)

R. E. Odeh and E. J. Cockayne, Balancing weights on the integer line, J. Combin. Theory, 7 (1969), 130-135.

Last column is a(n,n) = A002838(n).
Row sums are A212352(n) = A047653(n)-1 = A000980(n)/2-1.
A007318 counts subsets by length, A327481 by mean, A013580 by median.
A327475 counts subsets with integer mean.
Cf. A000975, A024718, A070925, A079309, A326512, A326513, A361801, A362046.

a[n_, k_] := Length[ IntegerPartitions[ n*(2k - n + 1)/2, n, Range[2k - n + 1]]]; Flatten[ Table[ a[n, k], {k, 1, 11}, {n, 1, k}]] (* Jean-François Alcover, Jan 02 2012 *)
Table[Length[Select[Subsets[Range[-n,n]],Length[#]==k&&Total[#]==0&]],{n,8},{k,n}] (* Gus Wiseman, Apr 16 2023 *)

Equivalent to number of partitions of n(2k-n+1)/2 into up to n parts each no more than 2k-n+1 so a(n, k)=A067059(n, n(2k-n+1)/2); row sums are A047653(n)-1 = A212352(n). - Henry Bottomley, Aug 11 2001

A054106 Alternating sums of vertically aligned numbers in Pascal's triangle: T(n,k) = C(n,k) - C(n-2,k-1) + C(n-4,k-2) - ... +- C(n-2[n/2],m).

Original entry on oeis.org

1, 1, 1, 1, 1, 1, 1, 2, 2, 1, 1, 3, 5, 3, 1, 1, 4, 8, 8, 4, 1, 1, 5, 12, 15, 12, 5, 1, 1, 6, 17, 27, 27, 17, 6, 1, 1, 7, 23, 44, 55, 44, 23, 7, 1, 1, 8, 30, 67, 99, 99, 67, 30, 8, 1, 1, 9, 38, 97, 166, 197, 166, 97, 38, 9, 1, 1, 10, 47, 135, 263, 363, 363

Offset: 0

Clark Kimberling

			Rows: {1}; {1,1}; {1,1,1}; {1,2,2,1}; {1,3,5,3,1} ...

For (nonalternating) vertically aligned sums, see A013580.

Row sums of this array: A007910.

G.f.: 1/(1-(1+y)*x)/(1+y*x^2). - Vladeta Jovovic, Oct 12 2003

A362049 Number of integer partitions of n such that (length) = 2*(median).

Original entry on oeis.org

0, 1, 0, 0, 0, 0, 1, 3, 3, 3, 3, 3, 3, 4, 5, 9, 12, 19, 22, 29, 32, 39, 43, 51, 57, 70, 81, 101, 123, 153, 185, 230, 272, 328, 386, 454, 526, 617, 708, 824, 951, 1106, 1277, 1493, 1727, 2020, 2344, 2733, 3164, 3684, 4245, 4914, 5647, 6502, 7438, 8533, 9730

Offset: 1

Gus Wiseman, Apr 10 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). All of these partitions have even length, because an odd-length multiset cannot have fractional median.

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

For maximum instead of median we have A237753.
For minimum instead of median we have A237757.
For maximum instead of length we have A361849, ranks A361856.
This is the equal case of A362048.
These partitions have ranks A362050.
A000041 counts integer partitions, strict A000009.
A000975 counts subsets with integer median.
A325347 counts partitions with integer median, complement A307683.
A359893 and A359901 count partitions by median.
A360005 gives twice median of prime indices, distinct A360457.
Cf. A008284, A013580, A027193, A079309, A237800, A240219, A361801, A361848, A361858, A361859.

Table[Length[Select[IntegerPartitions[n],Length[#]==2*Median[#]&]],{n,30}]

A361800 Number of integer partitions of n with the same length as median.

Original entry on oeis.org

1, 0, 0, 2, 0, 0, 1, 2, 3, 3, 3, 3, 4, 6, 9, 13, 14, 15, 18, 21, 27, 32, 40, 46, 55, 62, 72, 82, 95, 111, 131, 157, 186, 225, 264, 316, 366, 430, 495, 578, 663, 768, 880, 1011, 1151, 1316, 1489, 1690, 1910, 2158, 2432, 2751, 3100, 3505, 3964, 4486, 5079, 5764

Offset: 1

Gus Wiseman, Apr 07 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(15) = 9 partitions (A=10, B=11):
  1  .  .  22  .  .  331  332  333  433  533  633  733   833   933
           31             431  432  532  632  732  832   932   A32
                               531  631  731  831  931   A31   B31
                                                   4441  4442  4443
                                                         5441  5442
                                                         5531  5532
                                                               6441
                                                               6531
                                                               6621

For minimum instead of median we have A006141, for twice minimum A237757.
For maximum instead of median we have A047993, for twice length A237753.
For maximum instead of length we have A053263, for twice median A361849.
For mean instead of median we have A206240 (zeros removed).
For minimum instead of length we have A361860.
For twice median we have A362049, ranks A362050.
A000041 counts integer partitions, strict A000009.
A000975 counts subsets with integer median.
A325347 counts partitions with integer median, complement A307683.
A359893 and A359901 count partitions by median.
A360005 gives twice median of prime indices.
Cf. A008284, A013580, A027193, A079309, A240219, A362048.

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

A361653 Number of even-length integer partitions of n with integer median.

Original entry on oeis.org

0, 0, 1, 0, 3, 1, 5, 3, 11, 7, 17, 16, 32, 31, 52, 55, 90, 99, 144, 167, 236, 273, 371, 442, 587, 696, 901, 1078, 1379, 1651, 2074, 2489, 3102, 3707, 4571, 5467, 6692, 7982, 9696, 11543, 13949, 16563, 19891, 23572, 28185, 33299, 39640, 46737, 55418, 65164

Offset: 0

Gus Wiseman, Mar 23 2023

nonn

The median of an even-length multiset is the average of the two middle parts.

Because any odd-length partition has integer median, the odd-length version is counted by A027193, strict case A067659.

			The a(2) = 1 through a(9) = 7 partitions:
  (11)  .  (22)    (2111)  (33)      (2221)    (44)        (3222)
           (31)            (42)      (4111)    (53)        (4221)
           (1111)          (51)      (211111)  (62)        (4311)
                           (3111)              (71)        (6111)
                           (111111)            (2222)      (321111)
                                               (3221)      (411111)
                                               (3311)      (21111111)
                                               (5111)
                                               (221111)
                                               (311111)
                                               (11111111)
For example, the partition (4,3,1,1) has length 4 and median 2, so is counted under a(9).

The odd-length version is counted by A027193, strict A067659.
Including odd-length partitions gives A307683, complement A325347.
For mean instead of median we have A361655, any length A067538.
A000041 counts integer partitions, strict A000009.
A000975 counts subsets with integer median, mean A051293.
A359893 and A359901 count partitions by median, odd-length A359902.
Cf. A008284, A013580, A079309, A240219, A240850, A349156, A359897, A359908, A359912, A360005, A360952.

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

cp's OEIS Frontend

A361857 Number of integer partitions of n such that the maximum is greater than twice the median.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A361864 Number of set partitions of {1..n} whose block-medians have integer median.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A361866 Number of set partitions of {1..n} with block-means summing to an integer.

Views

Author

Keywords

Examples

Crossrefs

Programs

Mathematica

Extensions

A212352 Row sums of A047997.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

Formula

A361911 Number of set partitions of {1..n} with block-medians summing to an integer.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

Extensions

A047997 Triangle of numbers a(n,k) = number of balance positions when k equal weights are placed at a k-subset of the points {-n, -(n-1), ..., n-1, n} on a centrally pivoted rod.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

Formula

A054106 Alternating sums of vertically aligned numbers in Pascal's triangle: T(n,k) = C(n,k) - C(n-2,k-1) + C(n-4,k-2) - ... +- C(n-2[n/2],m).

Views

Author

Keywords

Examples

Crossrefs

Formula

A362049 Number of integer partitions of n such that (length) = 2*(median).

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A361800 Number of integer partitions of n with the same length as median.

Views

Author

Keywords

Comments