A360244 - OEIS

A360244

Number of integer partitions of n where the parts do not have the same median as the distinct parts.

0, 0, 0, 0, 1, 3, 3, 9, 11, 17, 23, 37, 42, 68, 87, 110, 153, 209, 261, 352, 444, 573, 750, 949, 1187, 1508, 1909, 2367, 2938, 3662, 4507, 5576, 6826, 8359, 10203, 12372, 15011, 18230, 21996, 26518, 31779, 38219, 45682, 54660, 65112, 77500, 92089, 109285

(list; graph; refs; listen; history; text; internal format)

OFFSET

0,6

COMMENTS

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

LINKS

Table of n, a(n) for n=0..47.

EXAMPLE

The a(4) = 1 through a(9) = 17 partitions:

(211) (221) (411) (322) (332) (441)

(311) (3111) (331) (422) (522)

(2111) (21111) (511) (611) (711)

(2221) (4211) (3222)

(3211) (5111) (3321)

(4111) (22211) (4311)

(22111) (32111) (5211)

(31111) (41111) (6111)

(211111) (221111) (22221)

(311111) (33111)

(2111111) (42111)

(51111)

(321111)

(411111)

(2211111)

(3111111)

(21111111)

For example, the partition y = (33111) has median 1, and the distinct parts {1,3} have median 2, so y is counted under a(9).

MATHEMATICA

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

CROSSREFS

For mean instead of median: A360242, ranks A360246, complement A360243.

These partitions are ranked by A360248.

The complement is A360245, ranked by A360249.

A000041 counts integer partitions, strict A000009.

A008284 counts partitions by number of parts.

A116608 counts partitions by number of distinct parts.

A240219 counts partitions with mean equal to median, ranks A359889.

A325347 counts partitions w/ integer median, strict A359907, ranks A359908.

A359893 and A359901 count partitions by median.

A359894 counts partitions with mean different from median, ranks A359890.

A360071 counts partitions by number of parts and number of distinct parts.

Cf. A000975, A027193, A067659, A326619/A326620, A326621, A359902, A360068, A360241, A360250, A360251.

Sequence in context: A133164 A022156 A125027 * A360242 A005296 A124281

Adjacent sequences: A360241 A360242 A360243 * A360245 A360246 A360247

KEYWORD

nonn

AUTHOR

Gus Wiseman, Feb 05 2023

STATUS

approved